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PREFACE 

This manual provides information concerning the Texas Instruments DX980 
General Purpose Operating System for use by programming personnel work- 
ing with the system. The information is divided into eight sections and four 
appendixes as foll'ows: 

I, INTRODUCTION - This section describes the operating system and 
its components to provide an overview of its capabilities. 

II. JOB CONTROL LANGUAGE - This section introduces the Job Con- 
trol Language used in the system and details the required parameters 
and formats of JCL commands. 

III. INPUT/OUTPUT STRUCTURE - This section explains the organiza- 
tion of I/O handling routines and lists the I/O Supervisor Calls. 

IV. DISC FILE MANAGEMENT - This section describes the storage of 
data in disc files and how the operating system controls that opera- 
tion, 

V. SUPERVISOR CALLS - This section lists and describes the super- 
visor calls available for programmer use. 

component subsystems that handle batch processing for the system. 

VII. INTERACTIVE TERMINAL SUBSYSTEM - This section describes 

the operation of the subsystem that provides interactive communica- 
tion between the terminal users and the operating system. 

VIII. UTILITIES - This section describes the characteristics of the 
utility programs available for use with the operating system. 

A. ERROR MESSAGES - This appendix lists DX980 error messages 
and definitions. 

B. RECOMMENDED JCL SEQUENCES - This appendix provides sample 
listings of JCL sequences for the operating system. 

C. ADDING TO ITS - This appendix provides detailed descriptions of 
the Interactive Terminal Subsystem as an aid to adding new applica- 
tion programs to run under the subsystem. 

D. ADDING NON-STANDARD DEVICES TO DX980 - This appendix de- 
scribes the procedure for designing a device service routine to ser- 
vice a device not normally supplied with the operating system. 
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An alphabetical index of key phrases also appears at the back of this manual, 
In addition to this manual the user should also have access to the following 
manuals that are referenced as applicable within the text of this manual: 

DX980 General Purpose Operating System, System Operator's Guide, 
Part Number 943004-9701 

Model 980 Computer, Basic System Use and Operation , Part Number 
961961-9710 

Model 980 Computer, Terminal User's Guide, Engineering Data , Part 
Number 943010-9701 

Model 980 Computer, Terminal User's Guide, Model 733 ASR/KSR Data 
Terminal , Part Number 943009-9701 

Model 980 Computer, Terminal User's Guide, Model 912 Video Display 
Terminal , Part Number 943014-9701 

Model 960 Computer and Model 980 Computer Debug User's Guide and 
Operating Instructions , Part Number 942760-970.1 

Model 980 Computer FORTRAN, Part Number 944800-9 701 

Model 980 Computer Assembly Language Input /Output , Part Number 
961961-9734 

Model 980 Computer Assembly Language Programmer's Reference 
Manual, Part Number 943013-9701 
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SECTION I 
INTRODUCTION 



1.1 GENERAL 



DX980 is a general purpose operating system that supports the Texas Instru- 
ments 980 Series minicomputers with major features that include the follow- 

• Interrupt driven device handlers 

• Multiprogramming with biased addressing and protected memory- 
bounds 

• Flexible job management with complete resource allocation 

• Comprehensive data management 

• Dynamic memory management 

• Priority scheduling of jobs and of tasks within jobs 

• Subsystems to support batch and interactive terminal processing 

These system attributes augment computer performance for application in the 
following areas: 

• Interactive information management systems that allow terminal 
devices to enter, retrieve and display data stored in an online disc 
information base. 

• High speed, real-time computing systems that provide both analog 
and digital data acquisition, and that include control loops that re- 
quire the computational capacity of a 980 computer. 

• Batch processing environments for program development, scientific 
data processing and business applications. 

• Combinations of the above systems for specialized applications. 

1.2 HARDWARE REQUIREMENTS 

The operating system nucleus occupies approximately 24, 000 words of main 
memory and requires the following additional system hardware: 

• Additional memory for support of subsystems, language processors, 
and application programs. 

• Either a moving head disc or a DS330 disc system. 

• Magnetic tape drive to initially load the disc, to allow a dump of the 
disc contents for reloading, and to provide offline storage. 
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Operator console for system interaction with the user. 
(Model 733 ASR terminal or equivalent) 

Interval timer. 



1.3 HARDWARE EXPANSION 

In addition to the required hardware for operation of the system, DX980 sup- 
ports a full 64K word memory computer system. The modular construction 
of the system allows easy addition of new peripheral devices and their re- 
lated service routines. Standard device service routines include support for 
one or more of each of the following peripherals: 

Texas Instruments Model 733 ASR Terminal, Part Number 
966645-0003 

Texas Instruments Model 733 KSR Terminal, TI Part Number 
966671-0003 

Teletype Model 33 ASR Teletypewriter, TI Part Number 
973346-0001 

Texas Instruments Model 912 CRT display unit, TI Part Number 
973306-0012 

High Speed Paper Tape Reader /Punch Combination, TI Part 
Number 973526-0003 

Highspeed Paper Tape Reader, TI Part Number 965946-0003 

132 Column I/O Bus Line Printer, TI Part Numbers 966792-0001 
and 966792-0011 

80 Column DMAC Line Printer, TI Part Number 217065-0001 

Card Reader, TI Part Number 966323-0003 

Analog-to-digital and digital-to-analog conversion equipment 

DS330 Disc Controller and Disc Drive System, TI Part Numbers 
942541-0002, 942541-0003, 942541-0004, 942541-0005, and 
942541-0006. 

Moving Head Disc, TI Part Number 955157-0001 

Texas Instruments Model 979 Tape Transport, TI Part Number 
217536-0001 

1.4 SYSTEM STRUCTURE 

The operating system is divided into a nucleus for executive functions common 
to most operations, and several subsystems that perform specific functions. 
In addition to the nucleus, two subsystem modules are supplied with the 
standard operating system: the Interactive Terminal Subsystem (ITS) and the 
Batch Processing Subsystem (BPS). Figure 1-1 illustrates the relationship 
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Figure 1-1. DX980 General Structure 



of these subsystems to the nucleus. Other subsystems may also be added to 
perform functions suited to special applications. The following paragraphs 
describe the characteristics of the standard system components. 



The nucleus is the portion of the operating system that defines the system 
parameters, handles input and output servicing, and provides real time 
reaction to the subsystems. The nucleus is divided into four main parts: the 
system table, the memory resident code, the procedure pool or system over- 
lay area, and a Dynamic System Control Area (DSCA). The real time fea- 
tures of the operating system are integrated into these areas and do not form 
a separate subsystem as do the Interactive Terminal Subsystem and the 
Batch Processing Subsystem. Real time features include rollin and rollout, 
task synchronization supervisor calls, dynamic device allocation, the ability 
to start other jobs via a supervisor call, and a method for controlling file up- 
dating with multiple online users. Most of the code for these features oc- 
cupies main memory only when in direct use and runs in the procedure pool. 

1.4. 1. 1 SYSTEM TABLE. The System Table describes the operating 
parameters of the system including: system job parameters, system wide 
control blocks, and pointers to system queues, the DSCA, procedure pool 
and free area. The table is created during system generation. 

1.4.1.2 MEMORY RESIDENT CODE. Memory resident code is that portion 
of the operating system that is always in main memory. This code performs 
the following functions in the DX980 system: interrupt processing, system 
disc device handling, task management, preliminary supervisor call process- 
ing, memory management, overlay management, and commonly used lower 
level system subroutines. 

1.4.1.3 PROCEDURE POOL. The procedure pool is a dynamically allo- 
cated memory area used for system overlays. Approximately 80% of the sys- 
tem routines run in this area. These routines include: device service rou- 
tines not handled by the memory resident code, job management, file 
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management, operator communications, and modules of rollin and rollout. 
The user can select the size of the procedure pool to adapt the amount of 
memory available to the operating speed required. 

1.4.1.4 DYNAMIC SYSTEM CONTROL AREA (DSCA). The DSC A is a 
volatile memory pool that is used by the procedure pool routines. Most of 
these routines are written in reentrant code. The DSCA provides a desig- 
nated work area for each task executing a procedure pool routine. The user 
can select the size of the DSCA. 

1.4.2 INTERACTIVE TERMINAL SUBSYSTEM (ITS) 

The Interactive Terminal Subsystem (ITS) provides simplified concurrent 
communications with several terminals. Included in ITS is the ITS Super- 
visor (ITSUPV) and the Interactive File Editor (IFE). ITSUPV manages the 
terminals, and provides LOGON and LOGOFF functions plus the required 
housekeeping functions for multi- terminal usage. ITSUPV interfaces easily 
with user written application programs. IFE provides interactive generation 
and editing of disc files containing source text. 

The ITS Supervisor initially checks the system's logical and physical device 
tables to derive a list of the terminals with which it can communicate (polling 
list). This list is based on the logical units assigned to the ITS at job start- 
up time. The ITS then assigns to each of the terminals on the list: 

• A buffer for data exchange with the terminal 

• A User Control Block 

The User Control Block contains pointers, flags, and a scratch pad memory 
space for use by application programs operating under ITS. One key param- 
eter in the control block indicates which body of code, or application pro- 
gram, is currently attached to the terminal. A single Command Table is 
available to ITSUPV for all terminals. The Command Table contains the 
names and entry points of the programs that can be run under ITS. After 
logging on, the terminal operator, through the ITS Supervisor, can select 
one of the programs in the Command Table for execution. Similarly, after 
completion of that program the operator can select another program. 

The ITS uses a Branch and Link command to pass the data exchange buffer 
to the selected application program. That program then processes the input 
and places any response to the terminal in the data exchange buffer. When 
the application program returns control to the ITS, the program may instruct 
the ITS to do any of the following operations: 

• Write the contents of the data exchange buffer on the corresponding 
terminal and return to the application program for more processing. 

• Write the contents of the data exchange buffer on the corresponding 
terminal, acquire a response from the terminal, and return for more 
processing. 
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• Read input from the terminal and return for more processing. 

• Return for more processing as time becomes available without 
intervening I/O operations. 

• Discontinue use of this application program by the terminal and 
indicate readiness for the operator to select a new application pro- 
gram. 

1,4.3 BATCH PROCESSING SUBSYSTEM (BPS) 

The Batch Processing Subsystem (BPS) consists of three data handling sub- 
systems that allow convenient batch input and output for the operating sys- 
tem. The three data handling subsystems are Batch Input Reader (BIR), 
Batch Input Spooler (BIS) and Batch Output Spooler (BOS). Any of these sub- 
systems can be activated from the system console by addressing a RUN com- 
mand to the proper subsystem. 

1.4. 3. 1 BATCH INPUT READER (BIR). Specifying BIR causes the oper- 
ating system to activate the assigned card reader and read input directly 
from that device. 

1.4. 3.2 BATCH INPUT SPOOLER (BIS). Specifying BIS instructs the op- 
erating system to activate the assigned card reader, read input continuously 
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ing can then proceed via the disc file (SYSIN) in parallel with the input oper- 
ation to increase throughput. 

1.4.3.3 BATCH OUTPUT SPOOLER (BOS). Specifying BOS instructs the 
operating system to access from the disc all data assigned to unit SYSOUT. 
The data is read from the disc and printed on the system output device . 
(usually a line printer). This feature allows data to be spooled on the disc 
during execution of a job by specifying the output unit as SYSOUT. When the 
output device becomes available, the operator can then activate BOS to dump 
the spooled data on that device. Use of BOS in this manner significantly in- 
creases throughput. 

1.5 INPUT /OUTPUT MANAGEMENT 

User programs running under DX980 select I/O devices with a logical unit 
number (LUN) rather than a physical device number. A statement within 
the JCL input for the job equates the LUN to a physical device name, while 
a physical device table for the operating system specifies an actual I/O de- 
vice to respond to the physical device name. This arrangement allows the 
I/O device assignments within the operating system and the logical unit num- 
bers within the user program to remain constant. A simple change to the 
JCL input allows the user to change the I/O medium. The operating system 
includes a Device Service Routine (DSR) for each I/O device supported by the 
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monitor. Each DSR translates the common program I/O interface to the 
unique I/O interface required by its type of I/O device. The physical device 
table ties a particular I/O device to the DSR that services it. Additional 
DSRs can be added to the system to support new I/O devices without serious 
change to the system. 

1.6 MEMORY MANAGEMENT 

All of memory that is not occupied by the resident operating system, system 
tables, and the procedure pool is designated as a free area. The operating 
system dynamically allocates this area to subsystems and to user jobs. When 
a program is loaded into memory, the operating system stores it in contig- 
uous locations in a single partition within memory. It then loads the upper 
and lower bounds of that partition into the hardware memory protect address 
registers of the memory controller, and enables the hardware Priviledged 
Instruction Feature. All program parameters can then be referenced with a 
relative address with respect to the lower bound of the memory partition 
since the hardware automatically biases the addresses with the lower bound 
address. The operating system allocates memory partitions to particular 
jobs on a best fit basis. 

1.7 PROGRAM HANDLING 

Programs run under DX980 are performed as jobs; each job is further 
divided into tasks. The following paragraphs explain these concepts with 
respect to the operating system. 

1.7.1 JOBS 

A job is a unit of work in the DX980 system. A job consists of a set of user 
tasks to be executed and the control information to communicate resource 
requirements to the system. The system runs each job when all required 
resources become available. When a job is complete, all allocated resources 
are returned to the system. They may then be allocated to another job as 
necessary. If the system has adequate resources, more than one job can be 
active at one instant. Each job competes for execution time on a priority 
basis . 

Jobs can be submitted to DX980 through the Batch Processing Subsystem 
(BPS), the Interactive Terminal Subsystem (ITS), the system console, or 
from another user job. The job submission procedure is the same regard- 
less of source. 

Once DX980 accepts the control information required to start a job, it places 
the information in a priority queue, called the job queue. Part of the job 
queue resides in main memory and part resides in a random access file on 
the system disc. As resources become available from jobs currently in 
execution, either through job termination or a specific request to release 
one or more resources, DX980 determines whether the additional resources 
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are sufficient to execute one of the jobs in the job queue. If so, the system 
changes that job's state from Ready to Running and starts the job. 

Each job in DX980 is requested with Job Control Language (JCL), and com- 
municates with the operating system using supervisor calls. A series of 
jobs may be combined into related job steps to perform a larger function, 
such as Compile, Link and Execute. In addition, a job may subdivide itself 
into two or more concurrently resident tasks. All user jobs run in protected 
mode and must remain within the memory bounds defined for that job. 

1.7.2 TASKS 

A task is a currently active program that coexists in memory with other con- 
current tasks, all of which may be in various stages of completion. One or 
more tasks combine to form a job. Tasks within a job may execute concur- 
rently and share the same reentrant body of code though each task is in a 
different state of execution. All jobs initiate as a single task. The initial 
task then issues supervisor calls to activate other tasks within its job area. 
Each separate task has its execution environment (register contents) and re- 
ceives a relative priority rank with other concurrent tasks. 

1 . 8 FILES 

A file is an organized collection of information. The file is divided into rec- 
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disc when not being used. The following paragraphs describe the organiza- 
tion of files, the types of files available with the operating system, and the 
file handling features of the operating system. 

1.8.1 FILE ORGANIZATION 
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the DX980 operating system. The system locates a specific file with a three 
parameter entry supplied by the user. The < volume > parameter specifies the 
disc drive unit that contains the file, and allows the system to access the 
Master File Directory for that disc unit. The Master File Directory lists 
all of the User Directories that are stored on that disc unit, and the physical 
disc addresses used to locate each directory. A second parameter, < fileid>, 
tells the operating system which of the User Directories contains the file. 
The system then calls up the proper User Directory, which lists all of the 
files on the disc unit for that user, and their location on the disc. A third 
parameter, < filnam>, tells the operating system which of these files to ac- 
cess for the required information. 

Volume number 1 is always the system disc unit containing all of the oper- 
ating system files. Therefore, systems with only one disc unit must label 
that disc as volume 1. Within the Master File Directory for the system disc 
is an entry for the SYSTEM User Directory. This directory lists all of the 
files that are part of the operating system. One of these files, SJCBFL, 
contains the Job Control Language (output of the JCL Translator program) for 
the system. Another file, JCLSRC, is the JCL source file. 
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Figure 1-2. Organization of Data Files within a Disc Drive 

1.8.2 FILE HANDLING 

The operating system provides the user with the following features when 
working with files: 

• File protection through both creator access and password entry; 
for either type of protection the user can specify whether it will be 
applicable for reading, writing or deleting, or any combination of 
those functions. 

• Maintenance of several User Directories, so that files can be 
segregated in a multi-user environment. 
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• File mapping performed by the system can also be assisted by a 
user request for a specific physical location to store a file. 

• Specification of exclusive files for use by one job only, or of shared 
access files for concurrent use by more than one job. 

• Momentary cooperative locking of shared files during update to pre- 
vent degradation; this feature prevents one job from destroying a 
file update made by another job within an interactive information 
management system. 

• Blocking of multiple logical records into physical records for data 
transfer and storage; these blocked records are built and disas- 
sembled in buffer areas within the job extension area of main mem- 
ory. 

1.8.3 TYPES OF FILES 

The operating system supports three types of files as outlined in the follow- 
ing statements: 

• Linked Sequential File - The records of this file are scattered 
throughout the storage medium, but are chained together by pointers 
within the file. This arrangement requires that the record be ac- 
cessed in sequential order, but also allows the file to grow dynam- 
ically like a magnetic tape file. 

• Relative Record File - This type of file contains records of a speci- 
fied length that can be accessed randomly within the file by their 
relative position to the beginning of the file. Records are allocated 
in contiguous storage space. 
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that is to be accessed in a random fashion, and sorts the keys in a 
tree structure for efficient location of each record. The keyed 
records can then be stored in non-contiguous areas, allowing the 
file to grow dynamically. A key indexed file may also include non- 
keyed records that are accessed sequentially with keyed records. 
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SECTION II 
JOB CONTROL LANGUAGE 



2. 1 GENERAL 

Job Control Language (JCL) specifies the structure and resource require- 
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action from DX980, are described in the DX980 General Purpose Operating 
System, System Operation Guide under the title of Operator Communications. 

2.2 JOB CONTROL LANGUAGE STRUCTURE 

Each job submitted to DX980 consists of one or more independent job steps 
that are executed in the order in which they appear in the job stream. For 
example, if two job steps are submitted, they will be executed in the order 
of step one and then step two. If any step aborts because of an error condi- 
tion, all subsequent steps will not be executed. 

Job steps would normally be combined in such a way that the successful exe- 
cution of each step depends on the successful completion of all preceding 
steps. A common example is a sequence of four steps to compile (2 phases), 
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if the compilation was successful, and the execution step would be started 
only if both the compilation and link were successful. 

Within the JCL statements for each step are assignment commands to asso- 
ciate Logical Unit Numbers (LUNs) specified in the user program with phy- 
sical devices or files. These commands allow the user to specify Input/ 
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device assignments until the program is run (runtime). For most sequential 
devices the assignment command merely links a LUN to the device. For a 
disc file, however, the user must specify the type of file to be assigned, 
whether the file is new, old or temporary, blocksize of the data records, 
and disposition of the file after termination of the job step. 

2.3 JCL PROCESSING 

There are two forms of Job Control Language (JCL): expanded JCL and 
abbreviated JCL. 

NOTE 

In the following discussion and throughout the man- 
ual, the term "card image" is equivalent to "source 
line image" and is applicable to other input devices 
as well as a card reader. 
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2. 3. 1 EXPANDED JCL 

Expanded JCL can specify the structure of individual job steps, the location 
of the object program (load module) for each step, and the resources re- 
quired for each step. These specifications would normally be prepared once 
for each type of job (e.g. , FORTRAN compile, link, and execute) and saved 
on a disc file for subsequent retrieval. Saving the JCL in card image form 
requires reprocessing each time it is retrieved. To avoid this reprocessing, 
DX980 saves the JCL in a binary form by passing the card images through a 
program that produces a savable binary image. Thereafter, the binary 
images can be processed on subsequent retrievals. The utility program that 
translates the card images to binary is called the JCL translator. 

Expanded JCL is not recognizable to the DX980 operating system, but only to 
the JCL translator program that runs as a job under DX980. Expanded JCL 
is the input to the JCL translator. 

2. 3. 2 ABBREVIATED JCL 

Abbreviated JCL, the mechanism for job submittal to DX980, is "cookbook" 
oriented. It allows a user to run a FORTRAN program by directing the op- 
erating system to "RUN FORTRAN". The user does not have to specify the 
detailed job step structure and resource assignments required to invoke the 
two passes of the compiler, to activate the link editor and finally to execute 
the program itself. This form must have a binary image of the expanded 
JCL saved on a disc file under the appropriate name, i. e. , "FORTRAN". 
That is, the expanded JCL must be prepared and processed for the FORTRAN 
example. However, this can be done by a systems programmer, leaving the 
applications programmer to debug his FORTRAN program without having to 
learn all ideosyncrasies of an expanded JCL. 

In addition to invoking an existing JCL sequence (a sequence of expanded JCL 
statements) by name only, abbreviated JCL allows modification of one or 
more JCL specifications at runtime. For example, the original JCL speci- 
fications might have assumed that a FORTRAN source program would be sup- 
plied on cards when in fact the source for a particular program is stored on 
a disc file. To satisfy this requirement, the user can specify at the time the 
expanded JCL is prepared that any given JCL parameter is either: 

(1) completely specified and cannot be modified at runtime, 

(2) completely specified but can be modified at runtime, or 

(3) not specified at all and must be supplied at runtime. 

With this facility, the user of a JCL sequence can decide that the original 
specifications or defaults are acceptable and invoke the sequence by name 
only, or he can decide that modifications are required and can specify the 
parameters to be modified. Abbreviated JCL is processed by the DX980 sub- 
systems or by the DX980 operator communications facility via the system 
console. 
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2.3.3 JC L TRANSLATOR 

The JCL translator is a utility program that runs in user memory (as 
opposed to running in memory that is allocated to the operating system). 
This program translates expanded JCL statements into an internal binary 
representation for later processing. Input to the translator can be supplied 
from any of the standard 980 input devices (card reader, cassette, magnetic 
tape, disc files, etc. ). Output from the translator can be stored on a disc 
file for later submission. Since the translator is a utility program, it can 
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saved JCL sequence for the translator is stored on the system disc together 
with several other sequences that are supplied with each DX980 installation. 

2.3.4 DX980 SUBSYSTEMS 

In any particular DX980 installation one or more of the subsystems may be 
active for submission of user jobs. For a system with a card reader the 
Batch Processing Subsystem is active and user jobs can be submitted from 
the card reader. For systems with several terminals attached, the Interac- 
tive Terminal Subsystem is normally active to allow jobs to be submitted 
from any of the terminals. In any case, jobs can be submitted from the sys- 
tem console. 

Job submission from each of these sources is consistent with the cookbook 
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from a disc file, modified according to the user's specifications, and sub- 
mitted to the operating system for execution. 

2.4 JOB SUBMITTAL 

Job submittal commands in DX980 are separated into two categories: JOB 
commands and RUN commands. The JOB command is required for a job sub- 
mission and identifies the user and the JCL sequence file to be used for that 
particular job. The RUN command represents abbreviated JCL and invokes 
a particular JCL sequence from the JCL file specified in the JOB command. 
When submitting a job via the system console or the Interactive Terminal 
Subsystem, only one JOB command is required. A job submitted for the 
Batch Processing Subsystem requires a JOB command for each RUN com- 
mand. The identifier, //, must appear as the first two characters of a 
source line image for both JOB and RUN commands. The system console 
supplies this identifier automatically; however, it must be specifically sup- 
plied when submitting jobs under the Batch Processing Subsystem. The Inter- 
active Terminal Subsystem does not require the double slash identifier. The 
following conventions will be adhered to for all JCL descriptions throughout 
this manual: 

• Brackets [ ] enclose optional fields. 

• Operands may be separated by either blank(s) or a single comma 
with or without intervening blanks. Successive commas may be 
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used to indicate a null operand. Both comma (, ) and the symbol, 
tf>, denote specified field separations. 

• All numerical value parameters must be either decimal (base ten) 
or hexadecimal (base sixteen). A numeric parameter is assumed 
to be base ten unless it is immediately preceded by a "greater than" 
symbol (>) to denote a hexadecimal value. 

• The first character of a keyword or operand must be alphabetic and 
the remaining characters may be either alphabetic or numeric char- 
acters intermixed in any order unless specifically noted otherwise. 

• A period terminates a job control command or expanded JCL speci- 
fication. Comments may be written after the period. If no com- 
ments are written, the period is optional. 

• If the number of operands in a command exceeds the limits of a 
single record, the command operands can be continued in succeeding 
records by terminating each incomplete record with a semi-colon 
(;). Continuation records must begin past the first two spaces of 
the record, since the first two spaces will be ignored by the com- 
puter. If the input is on the system console, the computer auto- 
matically fills these two positions with two periods (. . ) following a 
record terminated with a semi-colon. Operands may then be entered 
immediately following the two periods. The number of continuation 
records is unlimited. This option can be used with both expanded 
and abbreviated JCL commands. 

• Items shown enclosed in angle brackets (< >) are variables that must 
be supplied by the user when submitting the command to DX980. 

2.4.1 JOB COMMAND (JOB) 

All jobs submitted to DX980 must be preceded by a JOB command. JOB iden- 
tifies the user submitting a job, the name of the job, and the file where the 
JCL sequence to be executed is located. Two acceptable forms of JOB com- 
mands are as follows: 

//JOB tf< jsname>tf<userid> 

//JOB y> <jsname># <userid># F IL E = (< volume >, <fileid>, <filnam>[,< pswd>]i 

In the first example containing no FILE specification, DX980 defaults to the 
System JCS file [FILE=(1, SYSTEM, SJCBFL, AB). ] . 

2.4.1.1 JOB KEYWORD. JOB is the keyword that identifies the remainder 
of a record as a JOB command. JOB must appear in positions three through 
six of the input record. Following the JOB keyword are the command oper- 
ands. These operands are position sensitive and must be separated by one 
or more blanks, or by a single comma with or without intervening blanks. 
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2.4.1.2 <jsname> OPERAND. The nomenclature, <jsname> refers to a 
name that is from one to six characters long. This name remains with the 
job throughout execution and represents the job name. 

2.4.1.3 <userid> OPERAND. The nomenclature < userid> refers to a 
name that is from one to six characters long and that identifies the user to 
the DX980 system. The < userid > operand appears only in the JOB command. 
This operand identifies the disc directory that points to the disc files owned 
by the user. Each directory is itself a disc file that contains information 
about each of the files that belong to it. A utility program, CATLOG, that 

is described later in this manual, creates and destroys the directories. 
When created, each directory is given a unique name, represented by the 
term<fileid>. A file may also be assigned an access restriction at the time 
it is first defined. If access to the file is restricted to only the originator 
(CREATOR) of the file, then the <userid>in the JOB command must match 
the< fileid>of the target file before access to the file is granted. 

2.4.1.4 FILE SPECIFICATION. FILE specification identifies the JCL se- 
quence (JCS) file for a particular job. Each DX980 installation is supplied 
with one file of commonly used JCL sequences referred to as the system 
JCS file. In addition, users may create their own JCS files for particular 
applications. In either case the FILE specification directs the system to the 
appropriate file. If the FILE specification is not explicitly provided, the 
FILE specification defaults to the system JCS file [FILE=(1 , SYSTEM, 
SJCBFL, AB)] . The following paragraphs explain the parameters of the FILE 
specification. 

<volume> Operand. The nomenclature <volume> represents an integer num- 
ber that specifies the disc unit containing the JCS file. The DX980 system 

i j: . — V^^. 1 onJ -.liTro-iro nnnfaino fh f» S v « f p m TCS file. Addi - 

dlSC IS aiWayS UJ.SC IIUIHUCJ. A, aim a.j.vvu.7 t> ^~ *.*.***.*.**. ~ - — ~ ~j 

tional disc units are labeled 2 through n (n < 20), and can be specified at 
Initial Program Loading (IPL). 

<fileid> Operand. The nomenclature <fileid> refers to a name that is from 
one to six characters long, and that specifies the file directory containing 
the JCS file. For the system JCS file this operand should be specified as 
SYSTEM . For a user JCS file this operand must correspond to the<fileid> 
that was specified when the JCS file was created. 

<filnam> Operand. The nomenclature <filnam> refers to a name that is from 
one to six characters long and that designates the file within < fileid> where 
the JCL sequences are stored. The file name for the system JCS file is 
SJCBFL. For a user JCS file this operand must correspond to the<filnam> 
that was specified when the file was created. 



2-5 Digital Systems Division 




943005-9701 



<pswd> Operand . The nomenclature <pswd> represents a name that is from 
one to four characters long and that is required only if the JCS file was desig- 
nated for password^protection when it was created. Normally JCS files 
would not be protected from reading (the process of acquiring a JCL sequence 
from a file is a read operation) and this operand is not required. However, 
if the file is password protected from reading, this operand is required and 
must match the password that was specified when the file was created. The 
file, SJCBFL, is not password protected from reading. 

2.4. 1. 5 JOB EXAMPLES. The following examples illustrate the use of 
the JOB command. 

(1) //JOB NAME1 SYSTEM The job with job name "NAME1 " 

will be run under the userid "SYS- 
TEM". Defaults on the three re- 
maining JOB parameters are "1 " 
for <volume>, "SYSTEM" for 
<fileid> and "SJCBFL" (acronym 
for System JCL File) for<filnam>. 

(2) //JOB NAME2 USER01 The job with job name "NAME2" 

will run under the userid "USER01 " 
The three default parameters are 
the same as example one. 

(3) //JOB NAME3 SYSTEM FILE=(1 , USER01 , JCLFIL) 

The job with job name "NAME 3" 
will be run under the userid 
"SYSTEM". The JCL sequence 
will be retrieved from the file 
name "JCLFIL" under < fileid> 
"USER01 " on disc number one. 
JCLFIL must have been previously 
created or the job will abort with 
a JCL error. 

2.4.2 RUN COMMAND (RUN) 

The RUN command is the control statement interpreted by DX980 subsystems 
and operator communications as a request to submit a job. This command 
and its operands comprise the abbreviated JCL for DX980 and must be sup- 
plied for each job submission. Only one RUN command is permitted within 
a JOB command. Thus each job submitted to DX980 requires a single JOB 
command followed immediately by a RUN command. 

The format of the RUN command is as follows: 

//RUN^<jcsnam>^[<k. =p.>^<k^=p_>. . .<k =p >] 

11 L c n n 
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2.4.2.1 RUN KEYWORD. The RUN keyword, following the command de- 
limiter (//), identifies the remainder of the record as a RUN command. 
This format is consistent whether the job is submitted via the Batch Pro- 
cessing Subsystem (BPS), or the operators console. If submitted under the 
Interactive Terminal Subsystem (ITS), the command delimiter does not pre- 
cede the RUN keyword. 

2.4.2.2 < jcsnam> OPERAND. The nomenclature < jcsnam> refers to a 
name that is from one to six characters lone and that reDresents a JCL se- 
quence within the JCS file specified in the JOB command. This operand 
allows several JCL sequences to be stored in the same file with a unique 
name for each sequence. This operand is an extension of the FILE speci- 
fication on the JOB command in that the FILE specification directs the sys- 
tem to the appropriate JCS file and <jcsnam> specifies the JCL sequence to 
be invoked. 

2.4.2.3 USER DEFINED KEYWORDS (k 1} k 2 , ..., k n ). The user defined 
keywords in the RUN command permit modification of JCL parameters at 
runtime. Changing parameters is frequently required when the default speci- 
fications for one or more resource assignments do not match the require- 
ments for a particular job submission. When expanded JCL is prepared for 
input to the translator, the individual parameter specifications may include 

a user defined keyword which allows those parameters to be overridden. 
Selection of the keywords is at the discretion of the programmer preparing 
the JCL sequence. For example, a user defined keyword for specifying the 
master data file input to a payroll program might be specified as "MASTFL" 
in one environment and as "PAYFIL" in another. 

All user defined keywords supplied in the RUN command must match the 
r.orresnondiner kevwords in the exnanded JCL. Unused kevwords in the ex- 

- - L - - O J i. ' 

panded JCL assume their default values. If no default was specified, a JCL 
error results. 

2.4.2.4 PARAMETERS FOR USER DEFINED KEYWORDS. The nomen- 
clature "pi p2 • . . p n " represents either numeric or mnemonic values to be 
substituted into the JCL sequence <jcsnam> that the system retrieves from 
the <filnam> file. The size of the numeric values must fit within the limits 
of the parameter being replaced. For example, if priority were the variable 
being specified, "p" must be between 1 and 31. 

2.4.2.5 RUN EXAMPLES. The following examples illustrate the use of the 
RUN command to invoke the JCL translator. A list of the expanded JCL for 
the translator is included in Appendix B of this manual. 

(1) //RUN JCL "JCL" is the<jcsnam> for the 

JCL translator. This sequence is 
stored in "SJCBFL" under the 
fileid "SYSTEM". This example 
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invokes the JCL translator with 
standard default assignments for 
input and output. The standard 
defaults are listed in the JCLTRN 
JCS in Appendix B of this manual. 

(2) //RUN JCL DSRC = CR2, DERR=LP1, DLST = LP1 



Run the JCL translator with over- 
ride parameters "LP1" (line 
printer number 1) for DERR (er- 
ror messages) and for DLST 
(JCL listing), and with "CR2" 
(card reader number 2) for 
DSRC (JCL source device). 



(3) //RUN JCL OBJ=(USER01, JCL, RLK) 



Run the JCL translator with de- 
fault parameters for DSRC, DERR 
DERR and DLST; use override 
parameters "JCL" for the file 
name under fileid "USER01" 
with password "RLK". 



2. 5 EXPANDED JCL SPECIFICATION 



The following sections describe the format of JCL translator input. A de- 
scription of the output is not appropriate at this point since it is only acces' 
sible to the DX980 subsystems. However, this information is available in 
Section V within the description of the Start Job supervisor call. 

2. 5. 1 JCL TRANSLATOR INPUT FORMAT 

All input commands to the JCL Translator require a single / (slash) as the 
first character of the source line image. This is followed by a legal com- 
mand (1 of o) and any applicable keywords, 

CREATE 

REPLACE 

DELETE 

EXEC 

ASSIGN 

END 
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These commands are explained later in this section. There are three accept- 
able formats for these input commands as follows: 

(1) /COMMAND <keyword>... 

(2) /COMMAND < keyword>=<value> . . . 

(3) /COMMAND < keyword>:=<label> . . . 

2.5.1.1 FORM ONE. The nomenclature <keyword> represents a binary- 
condition that is either M true M or "false". There is always one<keyword> 
for the "true" condition and another for the "false" condition. If both 
<keyword>s are specified for the same operand, the dual assignment will be 
detected as a JCL error. 

2. 5. 1. 2 FORM TWO. The notation <keyword>=<value> assigns a value or 
values to a particular <keyword> or <keyword>s respectively. This form 
may be used in either of the two formats as follows: 

a) <k >=<p >,<k >=<p > <k> =<p> 

1 l l l. n n 

b) <k>=(<p 1 >,<p 2 >, . . .,<p n> ) 

If the second format is used, all parameters are positional and must be sup- 
plied or replaced with successive commas. 

2.5.1.3 FORM THREE. The notation <keyword>:=<label>, permits the 
user to specify a label which becomes a<keyword> in the RUN command for 
operand replacement at job submittal. The translator will accept a combina- 
tion of form three and either form one or form two for the same operand. 
This combination creates an operand that may be submitted with an appro- 
priate default value if not overridden in the RUN command. Form three must 
be used if the operand is to be supplied when the job is submitted. 

2. 5. 1. 4 DEFAULTS. Each operand in a given command must either be 
supplied in one of the three forms or have an acceptable default value of 
zero. When operands are required but not supplied, DX980 inserts zero for 
the operands. If the default zero is not acceptable, omission of an operand 
results in a JCL error. Table 2-1 lists the JCL operand defaults. 
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Table 2-1. JCL Operand Defaults 



Command 


Parameter 


Default Value 


EXEC 


PROT/PRIV 


PROT 


ASSIGN 


EXCLUSIVE /SHARE 


EXCLUSIVE 




RELEASE /PASS 


RELEASE 




OLD /NEW/REPLACE 


OLD 




SAVE/DELETE 


SAVE 




PASSWORD 






2.5.2 CONTROL COMMANDS 

The first input record to the JCL translator must be a CREATE, REPLACE 
or DELETE command. The formats for this command are as follows: 

/CREATE <jcsnam> 

/REPLACE <jcsnam> 

/DELETE <jcsnam> 

The CREATE command adds a new JCL sequence, the REPLACE command 
replaces an existing sequence, and the DELETE command deletes an existing 
sequence in the JCS file. If CREATE or REPLACE is specified, additional 
input is expected after the command to define a new sequence. If DELETE 
is specified, no additional input is expected other than a /END command to 
terminate the operation. The name of the JCL sequence is <jcsnam>. Sub- 
sequent RUN commands to invoke the sequence must specify the same 
< jcsnam>. 

2. 5. 3 EXECUTE COMMAND 

Each job step defined for a sequence must begin with an Execute (EXEC) 
command. This command contains information to set up the execution en- 
vironment for the program to be run. Input and output information is not in- 
cluded. If there are multiple steps in a sequence, each step must begin with 
an Execute command. The Execute command supplies the following informa- 
tion about a program: 

• object program 

• memory usage 

• priority 



2-10 



Digital Systems Division 




943005-9701 



• time limit 

• execution mode 

The format of the execute command is as follows: 
/EXEC operands 

The Execute operands may appear in any order following the command. The 
following paragraphs explain each operand. 

2. 5. 3. 1 OBJECT PROGRAM SPECIFICATION. The object program speci- 
fication operand supplies the location of the disc file that contains a binary 
memory image of the object program. The object file to be used as input 
must have been previously created by DXOLE. There are four parameters 
required to access a unique object file. The format of these parameters is 
as follows: 

OBJV=<volume> 

OBJN=<userid> 

OBJF=<filnam> 

OBJP=<pswd> 

An optional form can also be used: 

OBJ=(<volume>, <userid>, <filnam>, <pswd>) 

The OBJ parameters can be interpreted in the same manner as the corres- 
ponding parameters in the JOB command. For example, <volume> is an 
integer number from 1 to n that indicates a particular disc drive unit where 
the object file is located. The other parameters are user assigned. The 

^•n«wd> parameter is required onlv when the file is password protected for 

.. r _ .. _ r — _. „ 

the execute attribute. 

2. 5. 3. 2 MEMORY USAGE SPECIFICATION. The memory usage specifica- 
tion refers to the runtime memory allocation for the object program, file/ 
device buffers, and user control information. All memory specifications are 
represented in units of memory words (16 bits per word). Three parameters 
are required to completely specify user memory and are input in the follow- 
ing format: 

MEMT = <stksiz> 
MEMU=<jarea> 
MEMJ=<jearea> 
or in the optional form: 

MEM=(<stksiz>,<jarea>, <jearea>) 
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The parameter <stksiz> specifies the stack size supplied for the initial user 
task created by DX980 when the job is started. This memory area is used 
for temporary storage whenever a Supervisor Call (SVC) is executed by the 
user program (the DX980 SVC s are discussed in Section V. ) Since the 
DX980 SVCs are generally reentrant, execution of an SVC requires a work 
area for storage of local variables. If several reentrant modules are exe- 
cuted to perform the SVC function, the work areas for each module must be 
stacked as the SVC is processed. This work area stack must be supplied 
within the user program's job extension area. 

Although each DX980 SVC requires a different amount of memory for the 
work area stack, the I/O SVCs require the largest amount. Thus, a<stksiz> 
specification that satisifes I/O SVCs will also satisfy the remaining SVCs. 
The two. types. of I/O SVCs are I/O calls either to peripheral devices or to 
disc. I/O to peripheral devices requires approximately 125 words of 
<stksiz>, whereas disc file I/O calls can require up to 300 words. There- 
fore, specify 125 words if there are no disc files assigned and 300 words 
otherwise. Either size will be sufficient to handle all other SVCs. This 
<stksiz> specification applies only to the first task. Other tasks within the 
job define their own stack allocation. 

The parameter <jarea> defines the program job area for storage of the user's 
object program plus any work space required by that program. The size of 
an object program can be determined from the output of the DX980 Linkage 
Editor DXOLE. If the program was subjected to a pre-planned overlay when 
input to the Linkage Editor, <jarea> must be large enough to accommodate 
the longest or largest overlay segment plus three words per phase (including 
the root phase) for overlay directory. This information is also available 
from the Linkage Editor. 

If the user requires a program with a dynamic work area that can be speci- 
fied at runtime, <jarea>must specify sufficient memory for both the object 
program and the work space. The user program can then determine avail- 
able memory for the run through Get Memory supervisor calls within the 
program logic. This concept is particularly useful to allow the amount of 
program worKspace to oe aptjciiieu en. x nuumc xa.nx^x w^c^x yvj.*^..* .— ~ rJ .w & ^ — „ 
is compiled. 

The parameter <jearea> defines the user program job extension area and 
refers to that portion of the user's memory region used for file or device 
buffers and control information. This area, though not directly accessible 
from a user program, must be supplied for execution of the program. 

The determination of the <jearea> size is much more difficult thah that of 
<jarea> because the size of <jearea> is dependent on the logic of the user 
program and will vary throughout the course of program executions. The 
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following algorithm, though not exact, provides a guideline for the specifica- 
tion of <jearea>: 

(NF NB ) 

<jearea> = max I ]T ^ (BS. + 1) + 17*NT + 7*NL + SS + 1 1 > 

( i=l j=l l ) 

where 

NF = Number of files assigned to the job step 

NB = Number of buffers requested for each file 

BS = Block size 

NT = Number of co-resident program tasks 

NL = Number of logical units (LUNs) assigned concurrently to the job step 

SS = Dynamic TCB stack requirements 

Since the terms inside the braces vary as a function of the number of files or 
devices that are open and of the number of concurrent tasks that exist, the 
user must determine the maximum value of the expression to specify <jearea> 
size. 

The first term, disc file blocksize, is the sum of all blocking buffers that 
coexist at any instant in time plus one word of overhead for each block. 
Since memory is allocated to blocking buffers only when a file is open, this 
term varies according to the disc file activity in the user program. If mul- 
tiple buffers are specified for a single disc file, each buffer must be ac- 
counted for. 

The second term encompasses the memory requirements for task control 
blocks. Each task control block requires 17 words. Therefore, this term 
can be determined by multiplying the number of tasks that exist at any instant 
in time by 17. The operating system creates one task for the user job when 
the job is started. Therefore, there is always at least one task control block 
in the job extension area. Any additional tasks are directly created by the 
program using the Create Task supervisor call (Section V), or indirectly 
created by the program using an Initiate I/O supervisor call (Section III). 

The third term provides space for Logical Device Tables (LDT). There is 
one LDT for every file or device assigned to the job. Thus, this term can be 
determined as the number of logical units assigned multiplied by 7 (the size 
of each LDT). 

The fourth term, TCB stacksize, is a companion to the <stksiz> parameter. 
The memory specified for <stksiz> is allocated from the job extension area 
when the initial user task is created. If the user creates additional tasks 
within the program, the <stksiz> specification for the additional tasks must 
be supplied with the create task SVC. As each task is created, the memory 
required by the accompanying <stksiz> is also allocated from the job exten- 
sion area. Thus the TCB stacksize term must provide sufficient memory to 
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The fifth term, a constant 11, is due to overhead required by the DX980 
memory manager for control information, plus one extra LUN assignment 
that is made by the operating system for every user program. 



Example s : 

(1) MEM=(125, 2000, 152; 



(2) MEM=(300, 4000, 917) 



Allocate memory for a program 
with a single task and two LUN 
assignments to non-disc peri- 
pherals. The interpretation of 
this specification is: 

(1) <stksiz> of 125 words pro- 
vides a stack for I/O to non- 
disc peripherals 

(2) <jarea> of 2000 words for the 
object program. This num- 
ber is output from DXOLE. 

(3) <jearea>of 152 words accounts 
for one co -resident program 
task (17 words, two LUNs 

(14 words), 125 words of TCB 
stacksize, and 11 words of 
overhead. 

Allocate memory for a program 
with two tasks, one system cre- 
ated task and one user created 
task, and two LUN assignments 
to disc files, each with a physical 
record length of 128 words. The 
interpretation of this specification 
is: 

(1) <stksiz> of 300 words for file 
I/O 

^2^ <^area> of 4000 words as 

specified on the DXOLE load 
map 

(3) <jearea> of 917 words accounts 
for two co-resident program 
tasks (34 words), two LUNs 
(14 words), two physical rec- 
ord buffers (258 words), 600 
words of TCB stacksize (as- 
suming that the user created 
task was also created with a 
<stksiz> specification of 300 
words for disc I/O), and 11 
words overhead. 
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2. 5. 3. 3 PRIORITY SPECIFICATION. Priority specifies the priority of the 
job step at execution, and the number of unique priority levels needed within 
the step. This information is input to the DX980 computations which provide 
resources to the resultant program during job submission and program exe- 
cution. When the job is submitted^ this job step contends for system re- 
sources such as memory and peripherals along with all other job steps wait- 
ing to be initiated. When the job is executed, scheduling of the CPU is also 
determined by priority. The required parameters and appropriate mnemonic 



PRTL=<nprty> 

PRTS=<jsprty> 

or in the optional form: 

PRTY = (<nprty>, <jsprty>) 

The nomenclature <nprty> represents the number of task priority levels and 
is greater than one only if the program uses the multi -tasking feature of 
DX980. This number corresponds to the maximum number of separate task 
priority levels (not the number of separate tasks) that may be created within 
the user program. Several tasks may share a common priority level. 

The notation < i s r> rt' vr > represents the iob ste 1 ^ ' r >riorit^ 7 ' which is the ri riorit'* r 
assigned to the job step for scheduling purposes and to the initial task cre- 
ated by the operating system. The limits on <jsprty> are 1 to 31 where 1 is 
the highest and 31 the lowest priority permissible to a user program. More 
than one job may execute concurrently while sharing a common priority 
level. 

When a ^ob ste 1 "* is submitted DX980 checks the limits of the r> riorit xr param- 
eters as follows: 

1 < <nprty> < 31 

1 <<jsprty> < 31 

1 < <nprty> + <jsprty>< 32 

The limits on each parameter are due to the priority limits in DX980. The 
combined limit is due to the method of creating one task from another in 
DX980. If the user program creates additional tasks, the priority of each 
created task is specified relative to the job step priority (0, 1, 2, etc. ), 
where the relative numbers are always positive. Thus, a task cannot be 
created from a user program with a higher priority than the job step priority. 
However, tasks can be created with priority equal to or lower than job priority, 
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If any task is created with a priority lower than 31, the creation will be rec- 
ognized as a fatal error and the job will be aborted. This criteria produces 
the combined <nprty> and <jsprty> limit. 

Example s : 

PRTY=(1, 15) This job step contains only one 

task priority level. Both the job 
step and the task(s) created for 
program execution are assigned 
priority 15. 

PRTY= (2, 1) There are two task priority levels 

in this job step, levels 1 and 2. 
The job step is assigned priority 
1. 

2. 5. 3.4 TIME LIMIT SPECIFICATION. Time limit specifies the maximum 
amount of time for execution to be allotted to a job step. The time monitored 
represents actual time that the program has control of the CPU (rather than 
wall-clock time). If the program has not terminated normally when the time 
limit passes, the operating system abnormally terminates the program. 
Time parameter format is as follows: 

TIME= time limit in seconds 

To instruct the translator and operating system to run a job with an infinite 
time limit, set the time limit to a minus one: TIME=-1. This input is in- 
terpreted as a directive to ignore timeout checking completely. 

2. 5. 3. 5 EXECUTION MODE SPECIFICATION. Privileged or protected re- 
fers to the mode of the program during execution. Normally user programs 
run in the protected mode so that they are prevented from damaging the op- 
erating system. System programs always run in the privileged mode, allow- 
ing them to move freely within available memory. The format of this param- 
eter is as follows: 

PRIV 

PROT 

2. 5. 3. 6 EXECUTE COMMAND EXAMPLE. The following input sample 
illustrates the use of the EXEC command: 

/EXEC OBJ=(l, SYSTEM, ASMBLR), MEM=(300, 5000, 1000), PRTY = (1 , 15); 

/TIME = -1 MEM-MEM, PRTY:=PRI, TIME: = TIM 
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2.5.4 ASSIGNMENT COMMAND 

Each job step must define the logical units for I/O operations. I/O assign- 
ments are not carried forward from one job step to another. Therefore, an 
assignment command must be included for each Logical Unit Number (LUN) 
referenced during execution of each job step, except when using the Execution 
Time Allocate SVC (see Section V). An assignment command has a slash (/) 
in column 1 and the keyword "ASSIGN" in columns 2-7. Following ASSIGN, 

+-"U, ^ ^ & o \ i~t t-> t-v-i q v-i t- nn a. -y a n A c -ma^r n£> Q t» f* n n f i P r\ in trip samf! f~nTP.fi lOTmS 3-S OH luc 

execute command. For convenience, however, the logical unit number and 
device name operands may be specified positionally, logical unit number first 
and device name second, or with the < keyword>=<value> form. As with all 
operands, the < keyword>:=<label> form can provide override capability when 
the job is submitted. 

Each assignment command in each job step must have the following minimal 
information: 

• LUN 

• device name 

• device shar ability 

• device disposition 

If device name specifies a random access device (moving head disc), 
then the following information must be supplied also: 

• file creation 

• file identification 
9 file disposition 

• number of file buffers (key indexed files only) 

If file creation is specified as "NEW", then the following must also be speci- 
fied: 

file type 

file integrity 

file allocation 

key length (key indexed files only) 

logical record length (relative record files only) 

Each operand, together with the operand limits and default value, if any, is 
described in the following sections. 
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2. 5. 4. 1 LUN OPERAND. LUNs provide a consistent method of communi- 
cation between a user program and the DX980 I/O system. All I/O requests 
from a user program must be accompanied by a LUN. Each LUN must be 
coupled to a physical device or file through the assignment command. This 
feature allows I/O requests in a program to be device independent, and de- 
fers the actual device assignments until the program is submitted for execu- 
tion. The LUN operand can take either of the following forms: 



or 



LUNO= <lun> 



/ASSIGN <lun> 



The notation < lun > is a decimal number in the range of to 250 (LUNs from 
251 through 255 are reserved for operating system use), and must be unique 
within a job step. Duplicate assignments of the same LUN within a job step 
will be recognized as an error. However, the same LUN can be used by 
more than one job, since each assignment applies only to a specific job. 

2. 5.4.2 DEVICE NAME. Device names refer to the mnemonics that rep- 
resent the physical devices attached to the computer. The translator accepts 
any of the permissible device mnemonics that could exist for a DX980 instal- 
lation. If an assigned device does not actually exist, one of the subsystems 
detects the error when the job is submitted and the job is aborted. The 
DEVICE NAME operand can take the form of either of the following forms: 

DEVICE=<devnam> 

or 

/ASSIGN <lun> <devnam> 

The notation <devnam> represents a user supplied mnemonic that must be 
selected from the list in table 2-2. 



Table 2-2. Suggested Device Names 



Mnemonic 


Device Index 
Range 


Device Description 


DISCI -DISCn 
n < 20 

KEYl-KEYn ^ 

CRTl-CRTn 
SC 


► 


1 - 20 
21 - 30 


< 


Disc (Moving head or DS330) 1 through 
n, n < 20 

r Teleprinter keyboard (ASR/KSR 33, 730, 
733, 735) 1 through n 

Video display 1 through n 

System console data terminal (Tele- 
printer keyboard or video display) 
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Table 2-2. Suggested Device Names (Continued) 



Mnemonic 


Device 
Ran 


Index 
g e 


Device Description 


MTl-MTn 


31 - 


40 


Magnetic tape 1 through n 


LPl-LPn 


41 - 


50 


Line printer 1 through n 


CRl-CRn 


51 - 


60 


Card reader 1 through n 


PTRl-PTRn 


61 - 


70 


Paper tape reader 1 through n 


PTPl-PTPn 


71 - 


80 


Paper tape punch 1 through n 


DMl-DMn 


81 - 


90 


Data module interface devices 1 
through n 


ADDAl-ADDAn 


91 - 


100 


Analog -to -digital /digital -to -analog con- 
verter 1 through n 


CS11,CS12, 


101 - 


no 


Cassette 1 on teleprinter 1 through 


CSnl, CSn2 






cassette 2 on teleprinter n 


DUMMY 


255 


Dummy device - responds with an im- 








mediate end-of-file on input and with 








no-op on output 


SYSIN 


- 




System input spooler i 


SYSOUT 


- 




System output spooler 


TERMIO 


- 




Interactive terminal log on device 



2. 5. 4. 3 DEVICE SHARABILTTY. A device or file can be designated as 
either shared or exclusive. These attributes are specified by the binary rep- 
resentation of the keywords "SHARE" or "EXCLUSIVE". The default value is 
exclusive. If a device or file is exclusively assigned to one job, then any 
other job that is submitted with an assignment to that device or file, either 
shared or exclusive, will not be started until the first job releases it. If a 
device or file is selected as shared by all assigning programs, then all pro- 
grams may run concurrently. 

2. 5. 4. 4 DEVICE DISPOSITION. The device assignment may be kept or re- 
leased when the current job step is completed. This choice is specified by 
the binary keywords "RELEASE" or "PASS". The default value is release. 

Assignment passing in DX980 is extremely useful for multi-step jobs that re- 
quire the same file or device in more than one step. Further, passing a de- 
vice or linked sequential file will cause the physical position to be maintained 
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between job steps (key indexed and relative record files do not hold position 
between steps). Even though passed, a device must be assigned to a LUN 
for the next job step. 

The passing of only a portion of the required resources for a job string can 
cause a resource deadlock. However, DX980 guards against any deadlock by 
cancelling jobs that have passed resources from a previous job step and that 
are also requiring unavailable resources. Thus, to prevent a job cancella- 
tion caused by the running job environment, the user should specify that all 
resources are passed from job step to job step. 

2. 5.4. 5 FILE CREATION. A file may be either old, new, or a replace- 
ment. These attributes are specified by the binary representation of the key- 
words "OLD", "NEW" and "REPLACE" which are defined as follows: 

• OLD: File already exists (default value). 

• NEW: Create a file. Error if file already exists. 

• REPLACE: Replace file if it is there; create a file if it is not there. 

2. 5. 4. 6 FILE IDENTIFICATION. A file is accessed via a file directory 
(or dictionary) and file name, and can be protected by a password. The 
directory, name and password can be specified with either of the following 
formats: 

FILDIR=<fileid> 

FILNAME=<filnam> 

PASSWORD=<pswd> 



or 



FILE = (<fileid>,<filnam>, [<pswd>]) 

The <fileid> and <filnam> parameters are identical to the <fileid> and 
<filnam> parameters in the JOB command. A special case of the <fileid> 

_j _•_ ^ j~ j t^-*. 4-^-^-i-^/^i.n -*-ir filoc TVip i-i sat* ra n sn^rifv a file for 

parameter is piuvmcu ±v± i,ciu|;uj.uiji j.*^^^. -^~ - L y - - 

use only during a job string, by entering a <fileid> of "TEMP". This file is 
never entered into a User File Directory, but is totally unique to the job 
string using it. The file creation parameter should be NEW for the first ref- 
erence to a temporary file, and OLD for subsequent references. All other 
parameters are specified as usual. The file is deleted at the end of the job 
string unless deletion is specifically called for at the end of a job step by the 
DELETE directive. 

The notation <pswd> denotes a user supplied password that is used in con- 
junction with file integrity to control file access as described under "File 
Integrity" in this section. If this parameter is specified when a file is cre- 
ated, it will be required to access the file. Otherwise, <pswd> is ignored. 
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2. 5.4.7 FILE DISPOSITION. The user can choose to either delete or save 
a file after a job step. These two alternatives are specified by the binary- 
keywords: 

SAVE 

DELETE 

The default value is SAVE. If the device disposition parameter was "PASS", 
specifying "DELETE" produces an error condition that is detected by the 
operating system. 

2.5.4.8 FILE BUFFERS. Linked sequential files always require one buf- 
fer. Relative record files require no buffers if the logical record length 
equals the physical record length (unblocked), and require one buffer if the 
logical record length is less than the physical record length (blocked). These 
specifications are fixed and are unaffected by user input in JCL. However, 
file management supports a variable number of buffers for key indexed files. 
For a sequential access of the data records within a key indexed file, only- 
one buffer is required. For keyed access, a minimum of two buffers is re- 
quired: one for key records and one for data records. Using more than two 
buffers for these files reduces the amount of disc I/O required and increases 
program speed. Therefore, the number of buffers assigned to a key indexed 
file is controlled by the user through the Buffers specification.' The format 
for this specification is: 

BUFFERS=<nbufs> 

2. 5.4. 9 FILE TYPES. A file may be either linked sequential, relative 
record, or indexed. These attributes are specified by the binary representa- 
tion of the keywords "LINKSEQ", "RELREC", and "INDEXED". There is no 
default for file type, so it must always be specified. See Section IV for a de- 
scription of the three file types. 

2. 5.4. 10 FILE INTEGRITY. Files can be accessed under DX980 for one 
of four functions: read, write, delete, or execute. Data management pur- 
poses frequently require unlimited access to a file for one or more of these 
function, but only limited access for others. Therefore, DX980 provides an 
integrity mechanism for each of these functions. For example, DX980 can 
be instructed to allow any user access to a file for reading but require a 
password for access during writing or deleting. The format for supplying 
integrity codes (only appropriate for newly created files) is either: 

READCODE=<integ> 

WRITCODE=<integ> 
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or 



DELCODE=<integ> 
EXECODE=<integ> 

ACCESS=(<integ>,<integ>, <integ>, <integ>) 

The notation <integ> represents the integrity code supplied for each function. 
Select the code from the list of values in table 2-3. 

Table 2-3. File Integrity Codes 



Code 


Access Granted To 


ANY 
PSWD 

CREAT 
NONE 


All users for the specified function. 

User with password only (those users 
that specify a <pswd> parameter cor- 
responding to the <pswd> parameter 
of the file). 

Creator of the file only (the users that 
specify a <pswd> parameter correspon- 
ding to the <pswd> parameter of the file 
and whose <userid> in the JOB command 
matches the <fileid> of the file). 

No one (no access allowed for the speci- 
fied function). 



An "ANY" code specifies unlimited access, and allows a user to access the 
file for any specified function for which he knows the appropriate <fileid> 
and <filnam>. In this case the <pswd> parameter is not required for file 
specification. 

A "PSWD" code specifies that access for the associated function is possible 
only if the proper <pswd> parameter is supplied in file specification. "When 
a file is created with "PSWD" specified for a function, a <pswd> parameter 
must also be supplied during file specification. Integrity code violations are 
detected when the accessing program is running rather than when it is sub- 
mitted. For each I/O request DX980 verifies that the I/O opcode is valid for 
the integrity code that was established when the file was created. 

A "CREAT" code specifies that the <pswd> parameter must match the <pswd> 
parameter of the file and that the <userid> parameter in the JOB command 
must match the <fileid> parameter in the file specification operand for a user 
to gain access for the associated function. 
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A "NONE" code specifies that access is prohibited for the associated function. 
Normally, the only function that has "NONE" specified for an integrity code 
is "EXECODE"; however, "DELCODE" may also be specified as "NONE". 
The JCL translator ensures that "NONE" is not specified for READCODE or 

WRITCODE, and flags such a specification as a JCL error. A "NONE" code 
is automatically specified for EXECODE in the case of linked sequential and 
key indexed files since those file types are not compatible with the program 
loader in DX980. 



2. 5. 4. 11 FILE ALLOCATION. File allocation refers to the allocation of 
file space on a disc. This operand is pertinent only for files being newly 
created (NEW or REPLACE). Under DX980 the user must specify the initial 
and maximum space allocation, plus the physical record size of the file that 
will occupy the space. The user can also indicate to DX980 where the file is 
located on the disc. The format for supplying this information is one of the 
following: 

INITIAL=<itrks> 
LOCN=<trknum> 
PRECL=<prwrds > 



or 

ALLOCATE=(<itrks>,<trknum>,<prwrds>,< mtrks>) 

The nomenclature <itrks> represents the initial number of disc tracks that 
are allocated to the file when the file is created. If the file type operand is 
"RELREC", the initial allocation is forced to match the maximum allocation 
because relative record files must be stored contiguously on the disc and 
cannot grow. For the other file types, however, the file organizations are 
noncontiguous and allow the file to grow beyond its initial allocation. The 
default value for <itrks> is 1. 

The nomenclature <trknum> represents the disc track where DX980 will start 
searching for space to allocate to the file. The track allocation mechanism 
in DX980 starts searching for the number of tracks specified in <itrks> at 
track number <trknum> and continues the search until it finds sufficient con- 
tiguous space to satisfy the request. Normally the search starts at track 
and continues across the entire disc if necessary. Although disc tracks on a 
moving head disc are not physically constructed in ascending order across 
the disc, they are considered as such for the specification of <trknum> . In 
general, specifying a nonzero <trknum> may be used to position the new file 
close to another file. 
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This specification is useful only to reduce head movement on a moving head 
disc drive when both files are accessed by a single program. This arrange- 
ment can result in a significant throughput increase for I/O bound programs 
that access more than one disc file. 

The notation <prwrds> designates the number of words in each physical rec- 
ord. Each physical record stored on the disc is preceded by a record 
header. The moving head disc has a header at the beginning of each disc 
sector regardless of physical record length and individual track formatting 
is unnecessary. The DS330 disc system requires track formatting that in- 
volves writing record headers at the beginning of each physical record across 
the entire track. Various track formats are shown in table 2-4 for the DS330 
disc type. Maximum values for <prwrds> are shown in table 2-5. Formatting 
time for DS330 is 80 ms /track and occurs when the tracks are allocated to 
the file, either initially or when expanding to another track. Since the disc 
systems supported by DX980 store data in blocks of 32 words, it is necessary 
to constrain <prwrds> to multiples of 32 words. Furthermore, since physical 
record length is analogous to blocking buffer size, memory allocation for the 
job extension area (<jearea>in the JOB command) must comprehend the 
physical record length of each file assigned to a program. 

The parameter <mtrks> defines the maximum number of tracks that are allo- 
cated to a file that can grow, and in particular, to linked sequential and key 
indexed files. The initial allocation (<itrks>) for these file types is made 
when the file is created. When an operation tries to add data after the ini- 
tial allocation is used up, the file grows one track at a time until either the 
additions are completed or the number of tracks specified by <mtrks> is 
reached. In the latter case, the offending program terminates abnormally 
after file management allocates one extra track to perform the write opera- 
tion in progress. 



Example s : 
I (1) ALLOCATE=(l, 0, 32, 1) 



(2) ALLOCATE=(5, 100, 512, 10; 



Allocate 1 initial track, starting 
the search at track 0. Format 
each r>hvsical record into 32 

- i. j 

words and allocate no more than 
1 track regardless of program 
activity. 

Allocate 5 initial tracks, starting 
the search at track 100. Format 
each physical record into 512 
words and allow the file to grow 
to a maximum of 1 tracks. 
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Table 2-4. DS330 Disc Formatting 



Records/Track 


Sectors /Record 


Words/Record 
<prwrd> 


Useful 
Words/Track 


Efficiency 


88 


1 


32 


2816 


41. 90 


44 


2 


96 


4224 


62.86 


29 


o 

J 


160 


4640 


69. 05 


22 


4 


224 


4928 


73. 33 


17 


5 


288 


4896 


72.86 


14 


6 


384 


5376 


80.00 


12 


7 


448 


5376 


80. 00 


11 


8 


512 


5632 


83. 81 


9 


9 


576 


5184 


77. 14 


8 


10 


672 


5376 


80. 00 


8 


11 


736 


5888 


87.62 


7 


12 


800 


5600 


83. 33 


6 


13 


864 


5184 


77. 14 


6 


14 


960 


5760 


85.71 


5 


15 


1024 


5120 


76. 19 


5 


16 


1088 


5440 


80. 95 


5 


17 


1152 


5760 


85.71 


4 


18 


1248 


4992 


74.29 


4 


19 


1312 


5248 


78. 10 


4 


20 


1376 


5504 


81. 90 


4 


21 


1440 


5760 


85.71 


4 


22 


1536 


6144 


91.43 


3 


23 


1600 


4800 


71.43 


3 


24 


1664 


4992 


74.29 


3 


25 


1728 


5184 


77. 14 


3 


26 


1824 


5472 


81.43 


3 


27 


1888 


5664 


84.29 
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Table 2-4. DS330 Disc Formatting (Continued] 



Records /Track 


Sectors /Record 


Words /Record 
<prwrd> 


Useful 
Words /Track 


Efficiency 


3 


28 


1952 


5856 


87. 14 


3 


29 


2016 


6048 


90. 00 


2 


30 


2112 


4224 


62.86 


2 


31 


2176 


4352 


64.76 


2 


32 


2240 


4480 


66.67 


2 


33 


2304 


4608 


68. 57 


2 


34 


2400 


4800 


71.43 


2 


35 


2464 


4928 


73. 33 


2 


36 


2528 


5056 


75.24 


2 


37 


2592 


5184 


77. 14 


2 


38 


2688 


5376 


80. 00 


2 


39 


2752 


5504 


81.'90 


2 


40 


2816 


5632 


83. 81 


2 


41 


2880 


5760 


85.71 


2 


42 


2976 


5952 


88.57 


2 


43 


3040 


6080 


90.48 


2 


44 


3104 


6208 


92. 38 




45 


3168 


3168 


47. 14 




46 


3264 


3264 


48. 57 




a n 

T 1 


-2 -J - ? Q 


3328 


49, 52 




48 


3392 


3392 


50.48 




49 


3456 


3456 


51.43 




50 


3520 


3520 


52. 38 




51 


3616 


3616 


53.81 




52 


3680 


3680 


54.76 




53 


3744 


3744 


55. 71 




54 


3808 


3808 


56.67 



Change 1 



2-26 



Digital Systems Division 




943005-9701 



Table 2-4. DS330 Disc Formatting 


(Continued) 




Records /Track 


Sectors /Record 


Words/Record 
<prwrd> 


Useful 
Words/Track 


Efficiency 




55 


3904 


3904 


58. 10 




56 


3968 


3968 


59. 05 




K7 
~f i 


4032 


A fSTTl 


60.0 




58 


4096 


4096 


60.95 




59 


4192 


4192 


62. 38 




60 


4256 


4256 


63. 33 




61 


4320 


4320 


64.29 




62 


4384 


4384 


65.24 




63 


4480 


4480 


66.67 




64 


4544 


4544 


67.62 




65 


4608 


4608 


68.57 




66 


4672 


4672 


69.52 




67 


4768 


4768 


70.95 




68 


4832 


4832 


71.90 




69 


4896 


4896 


72.86 




70 


4960 


4960 


73.81 




71 


5056 


5056 


75.24 




72 


5120 


5120 


76. 19 




73 


5184 


5184 


77. 14 




74 


5248 


5248 


78. 10 




75 


5344 


5344 


79. 52 




76 


5408 


5408 


80.48 




77 


5472 


5472 


81.43 




78 


5536 


5536 


82.38 




79 


5632 


5632 


83. 81 




80 


5696 


5696 


84.76 




81 


5760 


5760 


85.71 
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T 


able 2-4. DS330 Disc Formatting 


(Continued) 




Records /Track 


Sector s /Record 


Words /Record 
<prwrd> 


Useful 
Words/Track 


Efficiency 




82 


5824 


5824 


86.67 




83 


5920 


5920 


88. 10 




84 


5984 


5984 


89. 05 




85 


6048 


6048 


90.00 




86 


6112 


6112 


90.95 




87 


6208 


6208 


92. 38 




88 


6272 


6272 


93. 33 



Table 2-5. Maximum <prwds> Physical Record Lengths 
for Disc Files 



File Type 


DIABLO Type Disc 


DS330 Type Disc 


Relative Record 
Linked Sequential 
Key Indexed 


2816 (full track) 
1408 (half track) 
2816 (full track) 


6272 (full track)' 
3104 (half track) 
6272 (full track) 



2. 5. 4. 12 KEY LENGTH. The length of keys for new indexed files can be 
specified as in the following format: 

KEYLEN=<klchar> 

The notation <klchar> represents the number of characters in each key for a 
key-indexed file and must be in the range of 1 to 30. The physical record 
length must be able to hold at least 2 keys plus 14 words. Providing a phys- 
ical record length that can hold 10 or more keys increases search efficiency. 
Section IV contains a detailed description of key index file directory formats. 

2. 5. 4. 13 LOGICAL RECORD LENGTH. The logical record length for new, 
relative record files can be specified in the following format: 

LRECL=<lrchar> 

The parameter <lrchar> specifies the logical record length in characters. 
If the relative record file is blocked, then the logical record length must be 
less than or equal to the physical record length. If the file is unblocked, then 
the logical record length must be a multiple of 32, and must be equal to the 
physical record length. LRECL is not appropriate for linked sequential and 
key indexed files since both allow variable length logical records. 
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2.5.4.14 ASSIGNMENT EXAMPLES. The following examples illustrate 
possible uses of the ASSIGN parameters. 

(1) /ASSIGN, 5, CR1, EXCLUSIVE, RELEASE. 

Assign LUN 5 to the card reader (CR). The card reader is not 
shared with any other user (EXCLUSIVE), and is released at the 
completion of the job step (RELEASE). The period (. ) indicates 
the end of the assignment and allows addition of user comments. 

{{.) /AobiGN o oRi JtLACi-iUDi v jl is.ii.L.Ji.Ad.k 

This example is equivalent to example 1. Delimiters between op- 
erands can be either blanks or commas. The period at the end of 
the statement is optional. 

(3) /ASSIGN 13 DISCI SHARE PASS OLD, FILE=(USRNAM, NAME) 
Assign LUN 13 to disc 1. The disc file is shared (SHARE) and 
passed to the next job step (PASS). Since a disc is specified, cer- 
tain file information must be given. The file is old (already exists) 
and can be referenced by name NAME in directory USRNAM. 

(4) /ASSIGN 250 DISCI SHARE PASS; 

/NEW, RELREC, FILE=( USRNAM, NAME), SAVE; 
/ACCESS = (ANY, GREAT, CREAT, PSWD); 
/ALLOCATE=(l, 38, 64, 1), LRECL=40 

A new file was specified so that more information is required in 
addition to that specified in example 3. The new file can be read by 
anyone (ANY), can only be written into or deleted by the creator of 
the file (CREAT, CREAT), and requires a password to execute code 
from the file (PSWD). The file is to have 1 track allocated and 
the search for this track must start at track 38. Each physical 
record is 64 words. Finally, the logical record length is 40 char- 
acters. 



(5) "/ASSIGN 6 SYSOUT 

SYSIN and SYSOUT are system spooling devices. 

(6) /ASSIGN DEVICE=SYSOUT, LUNO=6 
An alternative form of example 5. 

(7) /ASSIGN 6 SYSOUT LUNO:=NEWLUN 

This example has the same effect as examples 5 and 6 except that 
the LUN can be changed for this assignment by specifying 
//RUN . . . NEWLUN=7. . . when the job is submitted. 
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2.5.5 JOB CONTINUATION/TERMINATION 

Either another /EXEC card to specify a new job step, or a /END card to 
signify that all job steps for the job have been defined through the JCL Trans- 
lation phase must follow the last assignment of a job step. If the system de- 
tects no errors in processing the sequence of job steps, it writes the infor- 
mation specifying the job in the assigned output file, and locates that file in a 
position specified on either the CREATE or REPLACE control card. 

2.6 FORMAT SUMMARY 

Figure 2-1 summarizes the formatting options and requirements for job sub- 
submittal commands and for extended JCL commands. The format for sub- 
mittal commands appears at the top of the figure. The JOB command format 
is totally generalized; whereas the RUN command is an example that refer- 
ences an existing JCL procedure. The JCS for this existing procedure ap- 
pears in table 2-6. To clarify this example, table 2-7 lists the keynames 
that appear in table 2-6 that the JCL Translator recognizes, together with the 
default parameters and the default override labels for each keyname. If both 
a default value and an override label appear for the parameter, then it can be 
modified at runtime. If no default value is listed, then the parameter must 
be specified at runtime. If no override label is listed, then the parameter 
cannot be modified at runtime. Following the submittal commands in the fig- 
ure are the extended JCL commands. These commands constitute the input 
to the JCL translator. 

The figure displays, one above the other, all possible options for supplying 
job step information to the JCL translator. Dotted lines illustrate the points 
of convergence for the options. For example at the beginning of the line 
labeled "New File Specification", the three possible means for specifying file 
types appear as follows: 

/INDEXED, KEYLEN=<klchar <30>, 

RELREC, LRECL=<lrchar> -/ 

LINKSEQ -- -' 

This notation indicates that immediately following the slash (/) one of the 
three forms must be used to designate the file type. The dotted line indicates 
that all of the forms must be immediately followed by a comma before enter- 
ing the next parameter. 
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JOB SUBMITTAL COMMANDS 



JOB 
Command 



2 

RUN 
Command 



//JOB <jsname> <userid> FILE=(<volume>,<fileid>,<filnam>,<pswd>) 

FILE=(<volume>,<fileid> 5 <filnam>) 

X 



//RUN XJD,DSRC=<devnam>,FSRC=(<fileid> s <filnam>,<pswd>),DERR=<devnam>,LIST=<devnam>,D0BJ=DISC<n>,F0BJ=(<volume>,<fileid> 5 <filnam>),REP; 

/ 



J* 

I hr 



/ v 

f i_ 






EXTENDED JCL COMMANDS (JCL TRANSLATOR INPUT) 



Control 
Commands 



Execute 
Command 



ASSIGN 
Command 



/ * 

I 



3> 



/ 1 — k__^ 



u u u 3 



4 



NEW; 

LOBJ=(<itrks>,<trknum>,<prwrds>,<mtrks>),MEM=<stksiz><jarea>,<jearea>) ! 



J 



/DELETE <jcsnam> 

/REPLACE <jcsnam> - n 

i 

/CREATE <jcsnam> -J 

WEXEC OBJV=<volume>,OBJN=<userid>,OBJF=<filnam>,OBJP=<pswd>,MEMT=<stksiz>,MEM 

OBJ=(<volume>,<userid> s <filnam>,<pswd>) WMEM=(<stksiz>,<jarea>,<jearea>) W PRTY=(<nprty>,<jsprty>)-^ / <-!> PROT 

/ASSIGN LUNO=<lun>,DEVICE=<devnam>,EXCLUSIVE, RELEASE, FILDIR=<fileid> ; FILNAME=<filnam>,PASSWORD=<pswd>,BUFFERS=<nbufs>,REPLACE;-n 



<lun>,<devnam> 



-^/ SHARE — ,' PASS— -jfILDIR=TEMP, 

jo L-\ / ^ l£N ' riLt-pi iiciu-',^i ii mcuii->,<. 

| \y / | 1^7 FILE=(<fileid>,<filnam>)- 

i / L__y FILE=(TEMP,<filnam>,<pswd>) 

f ILEzQTMP ,<f ilnam >l^r-_zi - 






J* 



V 



~7 
_/ 



OLD; - 

NFLf. f 



_l 



New File 
Specification 



End of job 
Command 



J?> 



-/ INDEXED, KEYLEN=<klchar<30>,READC0DE=<integ>,WRITC0DE=<integ>,DELC0DE=<integ>,EXEC0DE=<integ>, DELETE, INITIAL=<itrks>,LOCN=<trknum>,PRECL=<prwrds>,MAXTRACK=<mtrks> 



RELREC,LRECL=<lrchar>-- T / ACCESS=(<integ>,<integ>,<integ>,<integ>)-- 
LINKSEO- 



\P 



/END 



NOTES: 



f> Refer to section 2.4.1.5 for file default on JOB Command. 

2> The RUN Command given here is an example. Refer to 
table 2-5 for the referenced JCS 

3^> Refer to table 2-6 for defaults specified in the 
referenced JCS 

!4> DELLTE does not require further input. 
|5> -1 designates infinite run time. 
6> Refer to table 2-6 for standard defaults. 



+J SAVE-V ALLOCATE=(<itrks>,<trknum>,<prwrds>,<mtrks>) 



\7^> No further input required for non file devices. 
8> BUFFERS = 1 for RELREQ and LINKSEQ; > 1 for INDEXED 



I? 



j9> <integ> must be one of following: 
^ ANY, PSWD,CREAT, NONE. 

VP PASS and DELETE cannot be specified simultaneously. 



(B)129979 



Figure 2-1. JCL Translator Formatting 
Summary 



Change 1 
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Table 2-6. Job Control Sequence (JCS) for RUN Command Example 



,* CREATE JCL .COMMENT, "CREATE Jet PROCEDURE » 

/REPLACE JCL . CREATE JCL PROCEDURE , 

/EXEC 03J«U, SYSTEM, JCLTRN) MEM*(300, 7550, 1000) PRTY*fl,l5)l 

/ _ TIME««»1 MEM|»MEM PRTYt^PRI 

/ASSIGN 1 SC DEVICEI«DSRC FIlEi«FSrC BUFFER3«1 ' SOURCE INPUT 

/ASSIGN 2 SC DEVlCEt«DERR SHaREI«SeRR . ERROR MESSAGE 

/ASSIGN 3 SC DEVICEl«DLST FlLE»»FLsT SHAREl«SLST BUFFERSM .SOURCE LISTING 

/ASSIGN 4 DISCJ DEVICElPDOBJ FlLE«(SYSTEM,SJCBFL#AB)» 

/ FILE?»F0BJ REPLACE!«RQBJ BUFFERS»2 INDEXED? 

/ ACCES8«(ANY,ANY,ANY,ANY) ACCESS1«C0BJ; 

/ ALLOCATE«(1,0,96,20) ALL0CAtE|«L0BJ KEYLEN-6 '. OBJECT OUT FILE 

/END 



Table 2-7. Parameter Keynames and Defaults for JCS Example 



Extended JCL Keyname 


Default 


Abbreviated JCL 
Override Label 


OBJ 
MEM 
PRTY 
TIME 


(1, SYSTEM, JCLTRN) 
(300, 7600, 800) 

(1,15) 
-1 


MEM 
PRI 


LUNO 
DEVICE 
FILE 
BUFFERS 


1 
SC 

2 


DSRC 
FSRC 


LUNO 
DEVICE 


2 

DO 


DERR 


LUNO 
DEVICE 


3 
SC 


DLST 


LUNO 

DEVICE 

FILE 

OLD/NEW/REPLACE 

LINKSEQ/RELREC/INDEXED 

ACCESS 

ALLOCATE 

KEYLEN 


4 
DISCI 

(SYSTEM, SJCBFL,AB) 
OLD 
INDEXED 
(ANY, ANY, ANY, ANY) 

6 


DOBJ 

FOBJ 

-/NEW/REP 

COBJ 
LOB J 



Change 1 
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SECTION III 
INPUT/OUTPUT STRUCTURE 



3.1 GENERAL 



A user program initiates input/output operations with an Input/Output Super- 
visor Call (I/O S'VC). The SVC is an illegal machine instruction that gener- 
ates an internal interrupt. The internal interrupt decoder turns control 
over to the SVC processor. After determining that an I/O SVC has been 
made, the SVC processor gives control to the I/O Management portion of the 
operating system. A set of modules, called Device Service Routines (DSRs), 
handles the primary I/O workload. 

A Device Service Routine contains several logical paths. When an I/O SVC 
is made, the system follows the initial entry path. The initial entry path be- 
gins the I/O operation and may or may not complete it. I/O device interrupt 
processing follows another path through the DSR. I/O interrupts can occur 
from the I/O Bus or the Direct Memory Access Channel (DMAC) of the com- 
puter. They occur while an I/O operation is in progress or when it is finish- 
ed. Interrupts from the I/O Bus typically occur on a character-by-character 
basis. Interrupts from DMAC devices occur only when the operation is com- 
plete. The system also has a reset path through the DSR to stop uncompleted 
I/O and to initialize the device and DSR. Separate operating system modules, 
working with a disc DSR, control file management for the disc. Section IV of 
this manual describes DX980 file management. 

3.2 I/O SUPERVISOR CALLS 



The I/O SVC is made by attempting to execute one of two illegal machine 
instructions: >C380 or >F800. The programmer usually defines the I/O 
SVC instruction word with a symbolic name using the OPD (Operation Defini- 
tion) assembler directive. To complete the call, the M-register must con- 
tain the address of either a Physical Record Block (PRB) for the C380 in- 
struction, or an argument list for the F800 instruction. The PRB is a list 
of parameters describing the I/O operation that has been requested, For 
example, if the programmer defines the I/O SVC as IOC (using OPD), a 
typical I/O call using the C380 machine instruction would be coded as 
shown on the following page. 
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SAP R9L.C 



SHEET 0001 



0001 TDT SAMPLE 

0002 * 

0003 * 

000* ioc opn >cs*0,3 nfFiME ioc 

0P05 * 
0006 * 
000<a lfrBP" 00PI7 PLOM «PRft PRB AQOR TCI MRfG 

p 0001 0003 

000? C380 000* TOC SVC INSTRUCTION 

0009 #**#*#*****#*#**#**#*•******#****#****#+******* 

0010 * 

0003 0000 0011 PRB DATA REFINE PRB 

0012 # 
0000 0013 FNO 



The F800 instruction is a special form of the more general F8XX format. 
The letters XX indicate the SVC number to be executed (Section V lists addi- 
tional SVC numbers). Using this format, the M-register must point to an 
argument list with the following arrangement: 

• Word - This argument list word specifies the number of argu- 
ments in the list. Word of an I/O SVC contains a 1. If the SVC 
has no argument, word contains a 0. 

• Word 1 - This argument list word contains a pointer to the first 
argument. Word 1 of an I/O SVC points to the PRB. 

• Word 2 through word n - These argument list words contain pointers 
to arguments 2 through n, respectively. These arguments do not 
apply to an I/O SVC since the PRB is the only argument. 

SAP R3LC mET Qftai 



0QP1 TDT SAMPLF 

«m inn 01 

A u — 

0003 SVX 

0004 * 



nPO >F800»8 DEFINE SVX 



*™\ * • ■ dm -ARr.i *T LIST AO0R TO MPEG 

0P0« 1S00 000« # L0M bARGLST »-**■ 

9 *™l> llll n «»T SVX 10 EXFCUTF CALL 

0002 F*00 0007 svx AU 

000S * 

000G * 

0010 *♦♦*#♦##*#*♦*********♦****************** 

«!i tan «t ntri 1 PRR NUM ARGS»A00RS 

0003 0001 0*12 ARGLST OATA l,P*o 

p 0004 0005 

000* 0000 ll\* PRB R * T * * nFF!NE PRB 

0015 * 
0000 0016 ENn 
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3.3 PHYSICAL RECORD BLOCK 

The Physical Record Block (PRE) is the list of parameters necessary for 
the supervisor to perform an I/O operation. The PRB is either four or five 
words long as shown in figure 3-1. The following paragraphs explain the use 
of these parameters. Variations of this PRB structure occur for non- 
standard I/O operations. Also, AD/DA and data module devices use a slightly 
different PRB format. Refer to the description of these device characteristics 
later in this section. 

3.3.1 WORD 

PRB Word contains flags that are controlled by the operating system I/O 
routines, and a logical unit number specified by the calling program. 

3.3.1.1 BIT (BUSY BIT). Bit applies only to Initiate I/O calls. This 
bit is set during the I/O operation. When set, this bit indicates that the pro- 
gram should not disturb the PRB or referenced data buffer. 

3.3.1.2 BIT 1 (ERROR BIT). Bit 1 sets if an unrecoverable I/O error 
or a logical error (see bit 6) was detected in the last operation performed 
using this PRB. This bit resets if no error was detected. If Return on I/O 
Errors was not requested when the device was opened, the job aborts on an 
unrecoverable I/O error. If this bit is set following a Return, then PRB 
word 2 contains an error code greater than 200. Appendix A of this manual 
defines these error codes. 

3.3.1.3 BIT 2 (END OF FILE BIT). Bit 2 sets if the last record read 
with this PRB was an end of file. For most media an end of file is a record 
whose first two characters are /*. End of File applies only to reading and 
spacing opcodes. (Opcodes 00, 01. 05. 06. 14 and 15.) 

3.3.1.4 BIT 3 (OPCODE IGNORED BIT). Bit 3 sets if the last I/O opera- 
tion was ignored because of the physical limitations of the I/O device. For 
example, an attempt to backspace a card reader sets this bit. Opcode Ig- 
nored is not necessarily an error condition. 

3.3.1.5 BIT 4 (END OF MEDIUM BIT). Bit 4 sets if the physical end of 
the storage medium was reached. Magnetic tape, cassette, and disc files 
provide end of medium detection. 

3.3.1.6 BIT 5 (BEGINNING OF MEDIUM). Bit 5 sets if the physical be- 
ginning of the storage medium was reached. 
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1 


2 


3 


4 


5 


6 


7 


8 


BUSY 


ERROR 


END 
OF 
FILE 


OPER 
IGNORED 


END 

OF 

MEDIUM 


BEGINNING 

OF 

MEQJUM 


LOGICAL 
ERROR 


OPER 
TERMINAL 

BY 
ESCAPE 


LOGICAL UNIT NUMBER (LUN ) 








3S SET BY SYSTEI 










* 
















00 

o 

o 
Ln 



WHEN SET AT 
OPEN TIME 



INITIATE 
I/O 


RETURN 
SEVERE 
ERRORS 


RETURN 
CORRECT- 
ABLE 
ERRORS 










OPEN 
FOR EX- 
CLUSIVE 
ACCESS 



WORD I < 



^ 



WHEN SET AT 

RUNTIME 

[OP CODES 00-29) 



WHEN SET AT 

RUNTIME 

(OP CODES 

100-119) 



OUTPUT 
WITH 
REPLY 



AUTO 
RECORD _. 
TERMINATE 



© 



© 



© 



FILE 
WRITE 
VERIFY 



DEVICE 
UNLOCK 



DEVICE 



INITIATE 
I/O 


KEY 
SPECIFIED 


KEY 
RECOVERY 
DESIRED 


RETURN 

RECORD 

SIZE 

ONLY 




FILE 
WRITE 
VERIFY 


FILE 
UNLOCK 


FILE 






AGS SET BY USER 






J 












1 



I/O OP CODE 



notes: 

(t) magnetic tape, cassette and disc file only 

@ data terminal only 

(3) applies to printing devices only 

if both lock and unlock are specified, the 

device/file is locked for the duration of 

the i/o operation 



-J 

O 



DATA RECORD LENGTH 



o 

5T 

O) 
Co 

*-* 

CD 

3 
Co 

O 
?" 

S" 
6" 

3 



DATA BUFFER ADDRESS/DEVICE ATTRIBUTES (OPEN CALL) 



(B)1 29983 



KEY ADDRESS (CERTAIN DISC FILES ONLY, SEE SECTION IV) 



Figure 3-1. Physical Record Block (PRB) Format 
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3.3.1.7 BIT 6 (LOGICAL ERROR). Bit 6 sets to indicate than an error 
occurred that may have been a successful request under other conditions. 
A Logical Error applies only to file management. For example, a write 
with key to a key indexed file when the specified key already exists. When 
bit 6 is set, bit 1 is also set. 

3.3.1.8 BIT 7 (OPERATION TERMINATION). Bit 7 sets when the escape 
key (ESC) of any data terminal is pressed, terminating any input or output 

vorril"^ in nrnrrroqe UTri 4-Vi/~i nf r>nTyirilatinn T7 1 r>, -n •*• g* ra A /-> i~> q -m ~» +■ A .-. i-> .1 ^ y» T-^-.,- 1 ™ J — J 

j.^'-.^j.v-*. *■*■■■■ |-'j.^g,-i-'>-D>j w t Kiiv^ v-i.1, ^wj.j.o.j-'j-CujLWi.j.. j. v->j. itciu uucianuuo *->il 1\C V IIIUCACU 

files, this bit indicates the return of a key value. 

3.3.1.9 BITS 8-15. This field contains the Logical Unit Number (LUN) 
for the I/O Operation as specified by the calling program. 

3.3.2 WORD 1 

PRB Word 1 contains flags that are set by the user program, plus an opcode 
for the I/O operation as specified by the user program. The opcode appears 
in bits 8 through 1 5 of word 1. The flags appear in bits through 7 of word 
1. The function of these flag bits varies with the time that the bit is set and 
the operation being executed. The following paragraphs describe the function 
of the flags under the three possible circumstances. 

3.3.2.1 OPEN TIME FLAGS. If the calling program sets a user flag in 
word 1 when opening an I/O device or a file, the operating system assigns 
the following definitions to the flags: 

• Bit - Initiate I/O: The calling program sets this bit to indicate 
that it is making an Initiate I/O call. When clear, this bit indicates 

ii. _ jl jli. _ i- i_i xp i.~ t / r\ — .11 

triax tiie prugrctm jls iiieu^iug an j-^2s.c^ui.c x/ w ^cl-lj.. 

• Bit 1 - Return on Uncorrectable Severe Errors: The calling pro- 
gram sets this bit to prevent the system from aborting the program 
if an uncorrectable severe error occurs during an I/O operation 
with the opened device. Instead, the system returns control to the 
calling program to recover from the error. 

• Bit 2 - Return on Correctable Error: The calling program sets this 
bit to prevent the system from asking for operator assistance if a 
correctable severe error occurs during an I/O operation with the 
opened device. Instead, the system returns control to the calling 
program with bit 1 in word set to recover from the error. 

• Bits 3 through 6 - These flags are unused during an open call. 

• Bit 7 - Open for Exclusive Access: The calling program sets this 
bit to indicate that the file or device being opened by the call cannot 
be shared, but must remain in exclusive control of the calling pro- 
gram until released. 
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3.3.2.2 RUNTIME I/O FLAGS. If the calling program sets a user flag in 
word 1 at runtime when requesting an I/O operation (Opcodes 00 through 29), 
the operating system assigns the following definitions to the flags: 

• Bit - Initiate I/O: The calling program sets this bit to indicate 
that it is making an Initiate I/O call. When clear, this bit indicates 
that the program is making an Execute I/O call. 

• Bit 1 - Output with Reply: If the calling program sets bit 1 and the 
I/O device is a data terminal, the terminal performs an output, 
usually a question, and waits for a reply. If multiple programs 
are using a data terminal, the reply is given to the correct pro- 
gram. If the I/O is assigned to a device other than a data terminal, 
setting bit 1 produces an input operation only. 

• Bit 2 - Automatic Record Termination: When bit 2 is set, data ter- 
minal input is automatically terminated upon reaching the input 
record length. Normal termination occurs when a carriage return 
is pressed. 

• Bit 3 - Formatted US ASCII Output or Suppress Bell on Input: When 
set during an output call, this bit instructs printing devices to use 
the first word of the output record as form control instead of data. 

Table 3-1 lists these form control characters. This function applies 
only to a Write USASCII output. When this bit is set during an input 
call, it prevents the bell on the input terminal from sounding. 

• Bit 4 - Suppress CR/LF Echo on Input: Setting bit 4 prevents the 
data terminal from echoing an input of CR/LF. 

• Bit 5 - File Write Verify: Setting this bit enables verification of 
disc data after writing. Use of this bit is described in the File 
Management Documentation in Section IV of this manual. 



Table 3-1. USASCII Format Control Word 



uiu\a / 



0-11 
12 

13 

14 

15 



Tio finifinn 



Reserved for future expansion. Should all be 0, 

- Format before record. 

1 - Format after record. 

- No carriage -return 

1 - Carriage-return 

- No line feed 

1 - Line feed 

- No form-feed or second line feed 

1 - Form-feed or second line feed 

(depending on Bit 14) 
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• Bit 6 - Device Unlock: Setting this bit allows other jobs to use a 
shared device that has been previously locked to the calling program. 

• Bit 7 - Device Lock: Setting this bit prevents other jobs that may be 
sharing the device from using the device until the device is unlocked. 
If both bit 6 and bit 7 are set concurrently, the device is locked until 
the I/O operation is complete. 

3.3.2.3 RUNTIME FILE FLAGS. If the calling program sets a user flap 
in word 1 at runtime when requesting a file operation (opcodes 100 through 
119), the operating system assigns the following definitions to the flags: 

• Bit 1 - Initiate I/O: The calling program sets this bit to indicate 
that it is making an Initiate I/O call. When clear, this bit indicates 
that the program is making an Execute I/O call. 

• Bit 1 - Key Specified: When set, this bit indicates that the calling 
program has specified a key to locate the desired file. The address 
of that key is contained in word 4 of the PRB. 

• Bit 2 - Key Recovery Desired: Setting this bit instructs the oper- 
ating system to recover a key and place it in the location specified 
in word 4 of the PRB if the record accessed has a key and bit 1 of 
PRB Word 1 (Key Specified) is not set. 

• Bit 3 - Return Record Size Only: Setting this bit transfers the 
length of the accessed record into the Data Record Length field of 
the PRB (word 2). No data transfer occurs. 

• Bit 4 - Unused for file management. 

• Bit 5 - File Write Verify: Setting this bit enables verification of 
disc data after writing. Use of this bit is described in the File 
Management Documentation. 

• Bit 6 - File Unlock: Setting this bit allows other jobs to use a 
shared file that has been previously locked to the calling program. 

• Bit 7 - File Lock: Setting this bit prevents other jobs that may be 
sharing the file from using the file until the file is unlocked. If 
both bit 6 and bit 7 are set concurrently, the file is locked until the 
I/O operation is complete. 

3.3.3 WORD 2 

Word 2 contains the data record length in characters for the I/O operation. 
Depending upon the type of I/O call, this field has various interpretations. 
For an open or change record length call (opcodes 7 and 12, respectively), 
this word sets the input record length for the logical unit. This record length 
limits the number of characters stored on subsequent input calls. For an in- 
put call, the I/O routines load this word with the number of characters actual- 
ly contained in the input record. For an output call, this word contains the 
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actual output character count. For utility operations such as back space or 
forward space, this word indicates the number of operations to perform. At 
the termination of these utility operations, the system returns the number of 
operations that were not performed (that is, Word 2 contains "0" if the opera- 
tion was successfully completed, and a number greater than zero if the sys- 
tem encountered an EOF or BOF before reaching the prescribed number of 
backspace or forward space operations). For operations on an AD/DA de- 
vice, this word is zero. 

When a return on error is specified (Bit 1, Word set) and an error does 
occur during the specified operation, this word contains an error code great- 
er than 200 (Appendix A describes the error codes for the system). When 
this occurs, the word must be reset before issuing another I/O request using 
this PRB. Table 3-2 summarizes the functions of PRB Word 2. 

3.3.4 WORD 3 

Word 3 contains the data buffer address which is the starting address of the 
logical data buffer for input and output operations. 

An open call causes the device attributes word to be placed in word 3. There^ 
fore, the data buffer address must be placed in word 3 following an open call. 



Table 3-2. PRB Word 2 



Case 


Word 2 


User/System Set 


Open ^i 


Input record length specifica- 
tion (limit of number of char- 


User 


Change record j 


acters transferred on subse- 




length J 


quent input calls) 




Input 


Input record character count 


System 


Output 


Output record character count 


User 


Back/forward space 


Number of operations to per- 
form 


User 




Number of operations unper- 


System 




formed 




Return with error 


Unchanged if no error occurred 
during operation 






Error code >200 if error oc- 


System 




curred during operation 




Data Module 


Output data 


User 


AD/DA Converter 


Zeros 


User 
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3.3.5 WORD 4 

Word 4 contains a key address that applies only to key indexed or relative 
files. Section IV of this manual explains disc files. 

3.4 FUNCTION OF SPECIFIC OP CODES 



Before a program can perform an I/O operation to a device or file, the pro- 
gram must open the device or file. An open call prepares the device or file 
to do an I/O operation. After the program finishes with the device or file, 



it- ehAii IH *-» 



iu cinuuiu i-iucie tile device or fixe, oiosiug a device ur file does not unassign 
it from the job; it can be re -opened later and used again. Closing does ini- 
tiate proper end-action for the device to ensure that no data is lost. Devices 
are opened and closed using I/O supervisor calls. 

When the program makes an open call, the I/O routines place the device 
attributes word in PRB Word 3. Table 3-3 summarizes the device attributes 
for standard 980 peripherals. Table 3-4 defines the function of I/O operation 
codes (op codes). 

Table 3-3. Device Attributes Word after Execution of an Open Call 



Bits 


Value 


Device Attribute 







System console 


1 




Dummy device 


2 




Can be rewound 


3 




Can be forward spaced 


4 




Can be back spaced 


5 




Printing device 


6 




Model 733 ASR cassette 


7 




Data terminal or CRT 


8 




Disc 


9 




Input device 


10 




Output device 


11 




USASCII transmission 


12 




Binary transmission 


13 




Reserved 


14-15 


00 


Peripheral device 


14-15 


01 


Linked sequential file 


14-15 


10 


Relative record file 


14-15 


1 1 

1 


Key indexed file 
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Table 3-4. Input /Output Opcodes 



Decimal 
Opcode 

00 



PRB 

Words 



Operation 
Read USASCII 



01 



Read Binary 



02 



Write USASCII 



Function 

One logical record is read from 
the specified LUN and stored in 
memory at the specified buffer 
address. The characters are 
packed two -per -word and the 
maximum number stored does 
not exceed the data record 
length specified in the last open 
or change record length call. 
The actual number of characters 
stored is returned in PRB Word 
2, and may be less than or equal 
to the requested input data rec- 
ord length. Any needed conver- 
sion to obtain internal USASCII 
representation of the data is 
performed. An end of file rec- 
ord, when detected, will set the 
EOF BIT. The most significant 
bit of all USASCII characters is 
equal to a 1 in memory. 

One logical record is read from 
the specified LUN and stored in 
memory in a manner similar to 
that described for Read USASCII. 
A character in this case is an 
8 -bit byte, and any necessary 
data conversion to obtain the 

Kinarir fnvmaf ic nor^nnwiQ/l 

End of file records are detected 
and cause the EOF BIT to be set. 

One logical record is transferred 
from the specified buffer address 
to the indicated LUN. The num- 
ber of characters transferred is 
specified in PRB Word 2, and 
the data is packed two characters- 
per -word. If the formatted 
USASCII record bit (PRB Word 1 
bit 3) is a 1, the printing DSR's 
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Table 3-4. Input/Output Opcodes (Continued) 



Decimal 
Opcode 

02 

(Cont'd) 



PRB 

Words 



Operation 



03 



Write Binary 



04 



05 



Rewind 



Back Space 
Record 



06 



Forward Space 
Record 



Function 

will interpret the first word in 
the buffer as form control. Any- 
necessary conversion from the 
internal US ASCII representation 
to the medium storage format is 
performed. 

One binary record is transferred 
from the specified buffer address 
to the indicated logical unit. The 
number of characters transmit- 
ted is taken from PRB Word 2. 
Any necessary conversion from 
binary to the medium storage 
format is performed. 

The physical device or sequential 
disc file is positioned at the be- 

ofinninfr nf f Ti a mo^inm 



The number of logical records 
specified in PRB Word 2 are 
skipped in the reverse direction. 
When an end of file record or be 
ginning of medium status is de- 









the appropriate PRB bit set and 
the operation count decremented. 
If an end of file caused the stop, 
the medium is positioned in 
front of the end-of-file record. 

The number of logical records 
specified in PRB Word 2 are 
skipped in the forward direction. 
When an end of file record or end 
of medium status is detected, the 
operation stops with the appropri- 
ate PRB bit set and the operation 
count decremented. If an end of 
file caused the stop, the medium 
is positioned to the beginning of 
the record that follows the end of 
file record. 
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Decimal 
Opcode 

07 



08 



09 



14 



PRB 

Words 



Table 3-4. Input/Output Opcodes (Continued 
Operation 



Open 



Open Rewind 
Close 



10 


2 


Close, Write 
EOF 


11 


2 


Write EOF 


12 


3 


Change Record 
Length 


13 


3 


Read Device 
Status 



Back Space File 



Function 

Initialize the logical and physical 
devices. PRB Word 2 sets the 
maximum input record length. 
The device attributes are re- 
turned in PRB Word 3. 

The I/O device is opened and re- 
wound as previously described. 

The necessary functions to ter- 
minate I/O to a device are per- 
formed. 

An end of file record is written 
and the device is closed. 

An end of file record is written. 

The maximum input record 
length is changed as specified in 
PRB Word 2. 

The Device Status Word is placed 
in PRB Word 2. The Device 
Status Word is device dependent 
and is individually described 
with each DSR in this section. 

The number of files (as delimited 
by end of file records) specified 
in PRB Word 2 are skipped in 
the reverse direction. If the 
start of the medium is encoun- 
tered, the operation stops with 
the beginning -of -medium flag 
set and the operation count decre- 
mented. Otherwise, the end of 
file bit is set. The medium is 
always positioned at the begin- 
ning of the first data record in 
a file. A backspace of one file 
remains within the current file 
so that if it is preceded by 
another backspace file it does 
nothing. A backspace two files 
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Table 3-4. Input/Output Opcodes (Continued) 



Decimal 
Opcode 

14 
(Cont'd) 



PRB 
Words 



Operation 



Function 

actually skips one file. A back- 
space record can be used to 
cross an end of file record in the 
reverse directions 



15 



Forward Space 
File 



16 



Unload 



17-18 
19/20 



Reserved 

Write /Read 
Direct 



The specified number of end of 
file records are skipped in the 
forward direction. If the end of 
the medium is encountered, the 
operation stops with the end of 
medium bit set and the operation 
count decremented. Otherwise, 
the end of file bit is set. 

Magnetic tape and cassette units 
are rewound and unloaded. Mag- 
netic tape units are placed off- 
line. 

Ignored by all DSR's. 

Device dependent calls supported 
by some DSR's for transfer with- 
out data conversion. Data formats 
are described with individual DSR 
description in this section. 
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3.5 INITIATE AND EXECUTE I/O CALLS 

The calling program sets bit in PRB Word 1 to signify Initiate I/O call and 
clears bit to indicate Execute I/O call. The Execute call suspends the 
user program until the entire I/O operation is completed, making the I/O 
appear to be a single, instantaneous operation of the calling program. In a 
system with many programs executing, the Execute call does not degrade 
total system efficiency since other programs are executed during the I/O 
call processing time. When one or a small number of programs are running 
in the system, the computer is substantially idle during the I/O transfers. 

If the Initiate /Execute Bit is a 1, the system returns to the program for fur- 
ther execution immediately following an I/O SVC. A program that is fre- 
quently used and has high I/O activity can use the Initiate Call to increase 
program throughput and attain maximum speed from I/O devices. The PRB 
from which an initiate I/O call has been made and its associated data buffer 
should not be modified until the I/O operation has been completed. The pro- 
gram can monitor the PRB Busy Bit (Word 0, bit 0) to detect completion of 
the I/O (if the Busy Bit is a 1, I/O is not complete). Doing an Initiate I/O 
call to a device while a previous call to the same device remains incomplete 
suspends the job until the first call is complete. 

If an Initiate I/O call has been issued and processing is complete to the point 
that the I/O operation must be complete in order to continue, use the Wait 
for I/O Complete supervisor call to suspend the program. This SVC converts 
the Initiate call that shares the same PRB to an Execute call. 
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A typical Wait for I/O may look as follows: 
SAP RPLC 



SHEET G}(*01 









0901 




IDT 


SAMPLF 






0«2P 


090? 


WAIT 


F0U i 


»2P 








0903 


SVC 


npn 


>F890,8 








0904 


* 












090S 


* 








0009 


1*09 


090? 




#LDM 


■ARGLST 


p 


0001 


0903 












090? 


FP2B 


0997 
0908 
0999 


* 
* 


svr 


WAIT 








0"»i£ 


*************************** 








0«li 


* 








0003 


0P8M 


991? 


ARGL3T 


DATA 


1,PRB 


p 


0904 


0(^05 


0913 


* 








0003 


092? 


9914 


PRB 


DATA 


>99?2 




0010ft 


090? 


091B 




DATA 


>Q0^2 




0007 


&90A 


09 1ft, 




DATA 


19 


p 


0908 


9<*09 


00117 
0018 

0919 


* 
* 


DATA 


BUFPEP 




000P 


09 0ft 


0929 


BUFFER 


DATA 


>P0<*6, 'SA*Pt E t » 




0004 


DSC1 












090R 


CDD9 












000C 


CCCS 












uaari 


AFFF 
9009 


0921 
092? 


* 


END 





HFFINE SVC 

LIST ADDR TO MRFft 
EXFCHTE CALL 

'*********** 
MUM ART.S.ADDRS 



LUNO >22 

WAS FRMTTD WRITE 
r CHR*FMT CWTRL 
ADDR OF DATA 



3.b STAiNJJAKJU UbAbUll KILUUKJJS 



DX980 uses two types of US ASCII records, formatted and unformatted. An 
unformatted record is a versatile record that is used to take advantage of 
special characteristics of a device. Therefore, unformatted records are 
usually installation and device dependent, whereas formatted records rely 
on the DSR to allow for specific device characteristics. 

Formatted USASCII records use the first word of the record to control phy- 
sical device formatting on printing devices. To output an 80-character rec- 
ord in the formatted USASCII mode, the program must make a call for 82- 
characters. The extra two characters are the first word that contains format 
control. Similarly, when an 80-character formatted record is read, the 
program must make an input call for 82 -characters to ensure that the entire 
record is read. The program can ignore the first word. 

To use the formatted USASCII mode, bit 3 of PRB Word 1 should be set to a 
1. Bit 3 is meaningful only for a Write USASCII operation (Opcode 02) that 
is directed to a printing device. Storage devices write the format control 
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character at the beginning of the data without modification. However, al- 
ways set bit 3 to ensure device independence if the designated output device 
is changed. 

The format control is not punched on paper tape, since that medium assumes 
a one-record-per-line format regardless of the format specified. 

3.7 I/O ERRORS 

Three types of errors are possible when executing an I/O operation: logical 
errors, severe errors, and fatal errors. Two of these types, logical and 
fatal errors, result from an error in the calling program. The other type, 
severe, results from a malfunction of the I/O device. When severe and fatal 
errors occur, the operating system prints an error message on the system 
console. This message contains an error number that identifies the type of 
error and the reason for the error. Table 3-5 lists the error numbers for 
I/O errors, their level of severity, and the cause of the error message. 
The following paragraphs describe the three types of errors. 

Table 3-5. I/O Errors 



Error 
Number 


Severity 


Description 


201 


Severe Correctable 


Device Not Ready 


202 


Severe Uncorrectable 


Controller Error 


203 


Severe Correctable 


Data Error 


204 


Severe Uncorrectable 


Controller Busy Error 


205 


Severe Correctable 


Write Protect Error 


206 


Severe Uncorrectable 


End of Record Sequence 
Error 


207 


Severe Uncorrectable 


Read -After -Write 
Error 


208 


Severe Correctable 


Offline 


209 


Fatal 


Illegal I/O Opcode 



3. 7. 1 LOGICAL ERRORS 

Logical errors occur only during file management operations and are the 
result of an error in the user call. For example, a user call to create a 
record with key when the key already exists in the file. This type of error 
is not catastrophic to execution of the program. Therefore, when a logical 
error occurs, the operating system returns control to the calling program 
so that it can take an alternate course of action. When the system returns 
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control to the program, it also sets the Logical Error and Error flags in the 
PRB (word 0, bits 6 and 1), and places the error number of the error in the 
Record Length field of the PRB (word 2). 

3.7.2 SEVERE ERRORS 

Severe errors occur during I/O operations and are the result of a status 
condition of the peripheral device that prevents it from performing the re- 
quested I/O operation. The error condition may be correctable through 
opsrEi.or inLcrvsriLion. or il mav us uncorrcCLSuiG. 

3.7.2.1 CORRECTABLE. A correctable severe error results from a 
status condition of the I/O device that the operator can fix. For example, a 
printer that is out of paper or a card reader offline causes a correctable 
error if the system can detect the required status condition. When such an 
error occurs, the system prints a message on the system console asking the 
operator to decide if he can correct the malfunction. The operator responds 
either by correcting the condition and then entering the response YES, or by 
entering the response NO. If the operator enters a NO response, the error 
becomes uncorrectable. If the operator enters a YES response, the system 
retries the operation. 

The user can choose to bypass the operator notification step and return 
directly to the calling program when a correctable error occurs. Setting 
PRB word 1, bit 2 during the SVC that opens the I/O device selects this 
option. If the site does not have a full time operator, this option allows the 
user to select an alternate I/O device rather than wait for the operator to 
correct the malfunction on the original device. 

3.7.2.2 UNCORRECTABLE. A severe error becomes uncorrectable if the 
operator enters a NO response to the system's request for a correctable 
error, or if the faulty status indication from the device is the result of an 
inherently uncorrectable error such as failed components in the peripheral 
interface. Uncorrectable severe errors abort the associated program. How- 
ever, the user can choose to avoid this outcome by setting PRB word 1, bit 

1, during the SVC that opens the I/O device. Setting this bit instructs the 
operating system to return control to the user program if an uncorrectable 
severe error occurs. When selecting this option, the user program must 
allow for alternate devices or remedial routines to cope with severe errors. 

3. 7. 3 FATAL ERRORS 

Fatal errors are the result of errors in the user program that cannot be 
reconciled by returning control to the program. For example, a call to read 
information from a line printer is impossible to execute. Since the error is 
part of the program or job control coding, the program is unable to adjust for 
the error. Fatal errors abort the associated program. This outcome can- 
not be avoided. 
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Opcode 


Operation 


Response From Device 


Dummy 


Full Duplex 
Terminal 


Paper Tape 
Reader 


Paper Tape 
Punch 


Card 
Reader 


Magnetic 
Tape 


Line 
Printer 


Tape 
Cassette 


Sequential 
File 


Relative 
Record File 


Key-Index 
File 


00 


Read USASCII 


Returns EOF 


Responds 
(/* = EOF) 


Responds [£>, |^> 

(/* = EOF) 


Error 


At least 1 
card read 
(/* = EOF) J£> 


Responds (Er- 
ror if after 
output) lb> 


Error 


(Error if after 
output )(/* = 
EOF) g> 


(End of medium 
if after output) 


Responds 


Responds u/p> 


01 


Read Binary 


Returns EOF 


Error 


Responds |2> 
(/* = EOF) 


Error 


At least 1 
card read 
(/* = EOF) £> 


Responds (Er- 
ror if after 
output) fo> 


Error 


(Error if after 
output)(/* = 
EOF) [§> 


(End of me- 
dium if after 
output) [£> 


Responds 


Responds B^p> 


02 


Write USASCII 


Responds 


Responds 


Error 

A 


R e s po nd s 
(/* = EOF) 


Error 

A 


R.e s n onds 

A 


Re s n oncis 


K. s s ""o nets 
(/* = EOF) 


Responds [7*> 


Acts as a 


Acts as a 
































replace/ 
add 


replace/ 
add 
function 1^ 


03 


Write Binary 






Error 

A 


1 




Responds 
(/* = EOF) 










Error 


Responds 
(/* = EOF) 


Responds [J> 


function 


04 


Rewind 










* 


Error 

A 


V 


V 


Generates 
form feed 


Responds 


Responds 


Responds 


Responds 


05 


Back space record 






v 


Error 




Error 


Responds 


Error 


Responds 


Responds 


Responds: EOF detection not 
possible, since not allowed 


06 


Forward space 
record 






Error 


Responds 1^ 


Error 


Responds l& 


Responds (Er- 
ror if after 
output) |> 


Error 


Responds |6x> 


Responds [8> 


Responds: EOF detection not 
possible, since not allowed j^> 


07 


Open 






CR/LF output 


Responds 


Responds 


Responds 


Responds 


Responds 


Responds 


Responds [J> 


Responds 


Responds 


08 
09 


Open-rewind 
Close 






CR/LF output 
Responds 


Responds 


Responds 
(Punches 
leader) 

Responds 


Responds 


1 I 


Generates 
form feed 

Responds 




Responds 

A 


T 

Responds 


* 

Responds 


10 


Close -write EOF 






LF 3 lines 


Error 


EOF Fol- 
lowed by 
trailer 


Error 






Generates 
form feed 










Close, but does not write 
EOF 


11 


Write EOF 






LF 3 lines 


Error 


EOF Fol- 
lowed by 
trailer 


Error 






Generates 
form feed 










Error 


Error 


12 


Change record 
length 






Responds 


Responds 


Ignores 


Responds 






Ignores 










Responds 


Responds 


13 


Read device status 






Responds 


Ignores 


Ignores 


Responds 




' 


Responds 


V 






Responds 


Responds 


14 


Back space file 


' 


' 


Error 


Error 


Error 


Error 


Responds 


Error 


Responds 






Response results in begin or 


16 


Forward space file 


Responds 


Error 


Responds I2> 


Error 


Responds |2> 


Responds |£> 


Error 


(Error if 
after output) 


Responds 


end of medium 


16 


Unload 


Ignores 


Ignores 


Ignores 


Ignores 


Ignores 


Responds 


Ignores 


Responds 


Ignores 


Ignores 


Ignores 


17 


Not assigned 


1 


1 


1 


1 


I 


Ignores 


1 


Ignores 


I 


1 


I 


18 


Not assigned 


Ignores 


Ignores 
Responds BO 


Ignores 


Ignores 


Ignores 


Ignores 


Ignores 


Ignores 


Ignores 


Ignores 


Ignores 


19 


Write direct 


Responds 


Error 


Error 


Error 


Error 


Error 


Error 


Error 


Error 


Error 


20 


Read direct 


Responds 


Responds U^ 


Responds &> 


Error 


Responds |^> 


Error 


Error 


Error 


Error 


Error 


Error 



NOTES: 1 Ignores blank frames and delete (rubout) frames. 

2 End of medium not detectable. 

3 Reads specified number of frames and stores them 
packed as received into user buffer. 

4 DSR translates invalid columns to valid characters 
without error indication. 

5 Stores 12 -bit card image, right- justified within 
words of user buffer. Character count = 160 
for complete card. 

6 End of medium = physical end; logical end not in- 
dicated. 



7 End of medium = current position when op complete; 
performance of op when not at EOM destroys data 
from current position to EOM. 

8 EOM status possible with decremented record count 
returned. 

9 If opened for exclusive access, position is retrieved 
from disc when opened and stored on disc when 
closed. 

10 The new record does not have an index key. A replace 
operation occurs if not at end of medium and both the 
old record and the index key (if any) are deleted. 



11 



12 



13 



Options allow recovery of both data record and index 
key, or functional deletion of both data record and 
index key from file. 

All characters are written directly from the buffer; 
caution should be exercised when the device has paper 
tape or cassette attached. 

This operation expands the read ASCII key to include 
a set of control characters. 



Table 3-6. Device Response to Sequen- 
tial I/O Commands 



Change 1 



3-19/3-20 




943005-9701 



3.8 INDIVIDUAL DEVICE CHARACTERISTICS 

All sequential I/O devices and sequential disc files restrict the operations 
that can successfully be performed with them. For example, devices capable 
of both reading and writing cannot arbitrarily switch between Read and 
Write modes. Other restrictions vary from device to device. Do not close 
and re -open a device to circumvent these restrictions since the results will 
vary for each device. Table 3-6 catalogues responses to I/O commands, in- 
cluding read-after -write restrictions. Most devices represent an end of file 
with a /* record, but some devices do not. Because of this inconsistency, 
always use the end of file command in lieu of a /* data record. 

3. 8. 1 DATA TERMINAL AND CRT DEVICES 

The Data Terminal Device Service Routine (DSR) operates with any of several 
devices interfaced using the Communications Module (TI Part Number 
966637). These devices include Texas Instruments Models 730 and 733 Data 
Terminals, Model 912 CRT, teleprinter devices similar to the 33 ASR or 33 
KSR, and the Hazeltine 2000 CRT. The DSR operates differently with each of 
these devices to compensate for operating variations of the devices. The DSR 
allows input to come from the paper tape reader device or the teleprinter type 
device. The DSR echoes input characters to the terminal as they are entered. 
For this reason the DSR does not use the terminals in true full- duplex mode. 
Performing a read direct operation with the full duplex terminal expands the 
read USASCII capability to accept the control code defined in table 3-7. 



Do not press the keys on the keyboard during a data 
transfer using either the tape cassette of an ASR 
733 or the paper tape of an ASR 33. The printer 
will not respond during the data transfer, and press- 
ing the keys may result in loss of data. 

3. 8. 1. 1 INPUT/OUTPUT OPERATION. The PRB of the calling program 
directs output to trie data terminal. If the formatted USASCII mode is speci- 
fied for output, the DSR adds carriage and form control as directed in the 
first word of the record. An input call rings the terminal bell unless PRB 
Word 1, bit 3 (Suppress Bell) is set. The DSR accepts input characters from 
the keyboard until a carriage return is selected. At that time the DSR echoes 
a carriage return - line feed to the printer. Regardless of how many charac- 
ters are typed, the number of characters stored is limited by the record 
length supplied in the open SVC. Two variations of this input operation are 
available with special PRB bits. If the Automatic Terminate Bit is set (PRB 
word 1, bit 2), the input terminates on a carriage return or full buffer, 
whichever occurs first. The second option suppresses echo of the carriage 
return - line feed when the record is terminated. The user selects this op- 
tion by setting PRB word 1, bit 4. All input characters are then echoed to 
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Table 3-7. USASCII Control Characters 



Hexadecimal 
Code 


Control 
Function 


Control 
Character 


Valid Character 
on Read Direct 


Postable 


System 
Special 


00 


NULL 


Shift /CTRL/p 




X 




01 


SOH 


CTRL/a 


X 






02 


STX 


CTRL/b 




X 




03 


ETX 


CTRL/c 


X 






04 


EDT 


CTRL/d 


X 




X(on 
output) 


05 


ENQ 


CTRL/e 


X 






06 


ACK 


CTRL/f 




X 




07 


BEL 


CTRL/g 




X 




08 


BS 


CTRL/h 






X 


09 


HT 


CTRL/i 






X 


0A 


LF 


CTRL/j 




■ 


x 


OB 


VT 


CTRL/k 




X 




OC 


FF 


CTRL/1 


X 






0D 


CR 


CTRL/m 






X 


0E 


SO 


CTRL/n 






X 


mr 1 

VJJ.' 


CT 


\~l J. J.\-J— J / (J 






V 


10 


DLE 


CTRL/p 


X 






11 


DC1 


CTRL/q 


X 






12 


DC2 


CTRL/r 


X 






13 


DC3 


CTRL/s 


X 






14 


DC4 


CTRL/t 


X 






15 


NAK 


CTRL/u 






X 


16 


SYN 


CTRL/v 


X 






17 


ETB 


CTRL/w 


X 






18 


CAN 


CTRL/x 


X 






19 


EM 


CTRL/y 


X 






1A 


SUB 


CTRL/z 






X 



Change 1 



3-21 



Digital Systems Division 




943005-9701 



Table 3-7. USASCII Control Characters (Continued] 



Hexadecimal 
Code 


Control 
Function 


Control 
Character 


Valid Character 
on Read Direct 


Postable 


System 
Special 


IB 


ESC 


Shift/ CRT L/k 






X 


1C 


FS 


Shift /CTRL/1 






X 


ID 


GS 


Shift/ CRT L/m 


X 






IE 


RS 


Shift/CTRL/n 


X 






IF 


US 


Shift /CTRL/o 






X 



the printer as they are received from the keyboard until the buffer is filled. 
Special characters are not placed in the buffer nor echoed to the printer. 
Tab and Escape also terminate an input record as described below. 

3.8.1.2 LINE EDITING. The operating system provides several online 
editing features as follows: 

• Delete Input Characters - Backspace (CTRL/H) and- (left arrow) 

deletes one input character. On Silent 700' s, the print head back- 
spaces and the DSR supplies a line feed when the first valid char- 
acter is entered. CRT's perform a left-cursor. Teletype machines 
type a backward slash (\). 

• Delete Input Record - Rubout deletes an entire input record which 
may then be re-entered. 

• List Input Record - CTRL/N lists the input record as currently 
stored. 

• Terminate I/O - The escape key terminates any active I/O opera- 
tion. The Terminate -on-Escape Bit in the PRB system flag area 
(Word 0, Bit 7) is set. 

• Tab - Tab is a special character than can be detected by the user 
program during an input call. The input is immediately terminated 
and the tab is placed in the data buffer, but the input record length 
in the PRB does not reflect its presence. 

• System Mode - If the data terminal is the system console, CTRL/O 
puts the data terminal in system mode. When in system mode, any 
user output assigned to the terminal is held in a queue until the ter- 
minal returns to user mode. 

• User Mode - If the data terminal is the system console, CTRL/U 
puts the data terminal in user mode. When in user mode, any sys- 
tem output assigned to the terminal is output without regard to mode, 



Change 1 



3-22 



Digital Systems Division 




943005-9701 



NOTE 

The following features insert or delete text within 
a record and are convenient for use with a CRT 
terminal only, 

• Increase Character Count - Line Feed or (down cursor) increases 
the input character count by the length of a line if it does not exceed 
the record size specified in the open SVC. Line length is specified 
in the Physical Device Table (PDT). 

• Decrease Character Count - t (up cursor) decreases the input char- 
acter count by the length of a line. Line length is specified in the 
PDT. 

• - (right cursor) increases the input character count by 1 if the 



input character size does not exceed the record size specified in 
the open SVC. 

• Freeze the output - While the terminal is outputting, pressing the 
control D key halts the current output. Pressing any other key 
while in this mode will reactivate the output. 

3.8.1.3 INTERACTIVE EXTENSIONS. Four device -dependent features 
are included in the DSR for data terminal input operations. They are ac- 
tivated by four separate flag bits in the PRB and may be used in several 
combinations. These flags do not apply to, and are ignored by, other device 
service routines. The features are: 

• Do not ring bell on input call. 

s Do not echo carriage return/line feed on innut ca.ll- 

• Output with reply operation. 

• Terminate input automatically when the data record length is 
reached. 

3.8.1.4 OUTPUT WITH REPLY. The Data Terminal DSR provides a spe- 
cial output/input function for question and answer operations. Setting word 
1, bit 1 (output with reply) in the input PRB directs the system to locate an 
output PRB immediately following the input PRB. This bit should not be set 
in the output PRB. The output (second) PRB is executed first. The respond- 
ing input is executed immediately, even if multiple programs are using the 
same data terminal. If the I/O is assigned to a device other than a terminal, 
it is considered an input operation only. All other DSR's ignore the output 
with reply PRB bit and execute only the first (input) PRB. 
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3.8. 1. 5 FORM FEED DETECTION. The data terminal DSR detects the 
form feed function when it is issued by either a formatted output record or a 
Form Feed Character in the output data stream. The terminal outputs six 
blank lines when a form feed is detected unless the Home-on-Form-Feed 
PDT Bit is set. In that case a home cursor command is issued. 

3.8.1.6 OPEN/CLOSE OPERATIONS. An Open or Open-Rewind SVC 
causes a CR/LF to be performed. A Close causes no special action, but a 
Close -Write EOF writes three blank lines on the terminal. A Write End-of- 
File command also results in three blank lines. 

3.8.1.7 AUTOMATIC LINE CONTINUATION. The DSR can print data 
records up to twice the carriage size on consecutive lines and without data 
loss. This feature is subject to two restrictions: 

(1) The print head must be at the left margin when the record begins 
to print 

(2) Formatted output must be used 

3.8.1.8 FORMATTED OUTPUT. This DSR supports formatted USASCII 
output. A form feed is defined as six blank lines unless the Home-on-Form- 
Feed PDT Bit is set. If that bit is set a form feed is interpreted as a home 
cursor operation. Unformatted I/O is device dependent. 

3.8.1.9 CARRIAGE RETURN DELAY. Each different terminal device re- 
quires from 1 to 5 null characters following carriage return commands to 
allow for print head travel time. The DSR checks the Physical Device Table 
(PDT) to determine the type of terminal so that it can generate the proper 
number of null characters. 

3.8.1.10 LINE FEED DELAY AND LINE CLEARING. A Clear to End-of- 
Line code is sent following line feed operations. For a CRT, this clears the 
display lines before output is done on a particular line. For other terminals 
it provides a one character delay. This delay following line feeds is equiva- 
lent to a null character. 

3.8.1.11 CHARACTER LOSS. Character loss does not occur if unformat- 
ted USASCII output with imbedded CR/LF' s is used. For Silent 700' s suffi- 
cient null characters are sent following a carriage return to avoid character 
loss. For other devices a single null character follows each carriage return, 
For all devices a clear end-of-line character is sent following a line feed. 
Unless the device is a CRT, this character is equivalent to a null character. 
Each line of a CRT is cleared before output is done on that line. 
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3.8. 1. 12 REPEAT KEY. The repeat key may be used to transfer a charac- 
ter repeatedly. The number of characters read will be echoed and printed. 

3.8.1.13 CTRL/H ON SILENT 700. The print head back spaces one posi- 
tion each time that the back space key is activated until the entire input rec- 
ord is deleted. The first new character echo following a sequence of back 
spaces is preceded by a line feed. 

3.8.1.14 CTRL/H ON CRT. The cursor moves left one position each 
time that the back space or left cursor key is activated until the entire input 
record is deleted. 

3.8.1.15 CTRL/H ON ASR/KSR 33. A backward slash is typed each time 
that the back space key is activated until the entire input record is deleted. 

3.8. 1. 16 ERROR CONDITIONS. No task or system errors are generated by 
the Device Service routine. Read operations with timeout specified may 
cause data error indication in the PRB. (See paragraph 3. 8. 1. 19). For de- 
tectable input errors the DSR discards the characters, echoing a Bell to the 
terminal. Opcode errors cause an abort condition. 

3.8.1.17 DEVICE STATUS WORD. A Read Device Status call reads the 

_j._i..._ i„±.~,. ~f 4-"U« rnr^mnniVatinns Mnflnlfi and transfers it to the calling 

program. If bit of the status word is a 1, the status is not valid and must be 
requested again. Bit can only be set to a 1 if the Communications Module 
receives a character between the time the DSR is entered for the read status 
and when the status is actually read. This is an unlikely occurrence, since 
the window for this to happen is less than 50 u s. Use of the status bits varies 
with the type of terminal. Refer to the applicable Terminal User's Guide 
listed in the Preface of this manual for the specific use of each status bit. 
The status word bits are assigned as follows: 

Bit - Invalid status if set. 

Bits 1 through 10 - Always zero. 

Bit 11 - Ring indicator. 

Bit 12 - Reverse channel receive. 

Bit 13 - Data carrier detect. 

Bit 14 - Clear to send. 

Bit 15 - Data set ready. 
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3. 8. 1. 18 PAPER TAPE INPUT. The paper tape reader on the teletype de- 
vices may be used to input data as if the data was being typed from the key- 
board. The user must momentarily set the start button for each record. Each 
record must be delimited by a carriage return (CR) and at least three "don't 
care" characters. All rubout characters at the beginning of each record will 
be ignored. 

3. 8. 1. 19 USER SPECIFIED TIMEOUT ON READ OPERATIONS. Read oper- 
ations may be timed out by setting bit 5 of the user set flags or the read PRB. 
If this bit is set, word 4 of the PRB is a pointer to a one -word field containing 
a right justified, non-zero, 8-bit timeout value in seconds. A >FF specifies 
no timeout. 

The data terminal device must be opened to return on correctable errors. 
(See paragraph 3. 3. 2. 1. ) A timeout will be indicated if the error bit of the 
system set flag is set and the returned error code is a 210. 

3. 8. 2 MODEL 733 ASR CASSETTE 

The Device Service Routine for the 733 ASR cassette handles 1200 baud cas- 
sette units. Each cassette is treated as a separate physical device. The 
DSR is functional only if the 733 ASR is operated in the line mode for USASCII 
processing. The device must include 1200 baud and remote device control 
options. The 733 ASR must be interfaced to the computer using the Com- 
munications Module. The DSR supports reading USASCII records that have 
been recorded in the continuous mode. 

3.8.2.1 TAPE RECORD FORMATS. Some data conversion is done prior 
to the recording on tape. The conversions described in this section apply to 
both Binary and USASCII records. These conversions are performed after 
initial conversions that vary between Binary and USASCII records. 

An USASCII cassette tape record is defined as data followed by a carriage 
return character. A record is more than one physical tape block long if it is 
greater than 86-characters (including the CR). The record always begins on 
a physical block boundry. All USASCII tape records require at least one 86- 
character tape block for storage. Since a CR determines the end of a physi- 
cal record, physical USASCII records rarely correspond exactly with logical 
USASCII records that were output by the DSR. For example, if an USASCII 
record ends with a carriage return/line feed, the LF becomes the first char- 
acter of the next tape block following the rest of the record. Since the DSR 
does not pass the CR or the LF to the user when reading USASCII, this 
arrangement causes no problems. 

All USASCII records require at least one tape block for storage. Short out- 
put logical records may tend to overrun the capacity or the 733 ASR recording 
buffer in the device. For this reason the DSR adds delete characters to all 
records as necessary so that any two consecutive tape blocks contain at least 
60 characters. 
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3.8.2.2 USASCII RECORDS. To allow offline cassette preparation and 
playback, cassettes are treated as printing devices instead of storage de- 
vices. Therefore, all formatted write USASCII operations expand the for- 
mat specification into form control characters before writing on tape. For- 
matted expansion is identical to the data terminal DSR expansion. 

Since a carriage return separates records on tape, the DSR appends a CR to 
the end of any USASCII write operation that does not have at least one CR in 
the data to be written. The hexadecimal characters 10 through 14 are re- 

S©r\TeCi COraryi gnetraCuSro etUQ arc iiul aliuwcu ±n uui^Dvu. Ic^uiubi j.j- uiig 

of these characters is encountered, the DSR converts it to a delete charac- 
ter before transmission to the 733 ASR. A write direct operation is equiva- 
lent to a USASCII write operation and is, therefore, not supported. The most 
significant bit of an USASCII character is not written on the tape. To trans- 
fer memory image data to cassette a write binarv must be used. 

The USASCII read operation passes all recorded characters from hexadeci- 
mal 20 to 5F to the caller. USASCII records are terminated by a carriage 
return on the tape, but the CR is not placed in the caller's buffer. Read di- 
rect passes all recorded data, including delete and null characters. It is 
also terminated by a carriage return and the CR is passed to the caller. 

3.8.2. 3 BINARY RECORDS. Each word in memory for a binary record 
is written on the tape as three 7 -bit characters. For example, the 16 -bit 
word: 

ABCDEFGHIJKLMNOP 

It is written on tape in three 7-bit characters as follows: 

110ABCD 

1EFGHIJ 

1KLMNOP 

3.8.2.4 END-OF-FILE RECORDS. An end-of-file in both binary and 
USASCII modes is a record with the first two characters being a (/*) combina- 
tion, followed by a carriage return, line feed, X-off, and more than one delete 
(rub-out) character. A write end of file command writes a /, *, carriage re- 
turn, line feed, X-off, and 256 delete characters. 

3.8. 2. 5 OFFLINE PREPARATION AND PLAYBACK. USASCII records 
can be prepared offline by typing with the recording cassette in the Line 
mode (RECORD switchlin the LINE position). Any cassette tape recorded 
using the USASCII write operation can be listed offline. An offline end of 
file is a "/*" followed by a carriage return. Binary records cannot be pre- 
pared or listed offline. 
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3.8.2.6 TAPE POSITIONING FUNCTIONS. Forward Space Record and 
Forward Space File commands operate with the DSR reading the cassette at 
its normal read rate. The Back Space Record command is not implemented. 
For USASCII records less than 86 characters each, a Block Reverse (DLE, 
8) operation is equivalent to a Back Space Record command. A Back Space 
File command assumes that the cassette was positioned at the beginning of 
a file when it was opened. The tape then block-reverses to the open point 
or to the last end of file read in the forward direction from the open point. 
The Backspace File opcode backspaces only one file. Unload rewinds the 
tape and leaves the cassette positioned on the clear leader of the tape. 

3. 8. 3 PAPER TAPE READERS 

The paper tape readers read 8 -level paper tape in either an USASCII, Binary 
or Direct mode. Support is provided for ASR33 type devices and high speed 
paper tape readers. 

3. 8. 3. 1 RECORD FORMATS. USASCII records are read as one tape frame 
per character. The most significant bit of each character is set to a binary 
one regardless of its state on the paper tape. USASCII records may be delim- 
ited by either of the following sets of characters: 

Reader Off (XOFF), delete, delete 

Carriage Return (CR), Line Feed (LF), delete, delete 

Records delimited by the second set of characters may have any set of char- 
acters between the CR and the LF, and any one character between the LF and 
the delete, as follows: 

CR, Xj, LF, X 2 , delete, delete 

where, 

X-. is any set of characters not containing an LF 

X 2 is any character 

Blank, punch on, punch off, and delete (rubout) frames are ignored. 

Binary records are read as four frames per word using the conversions 
shown in table 3-8. Records are terminated by an X-off character. 

Read direct (opcode 20) is implemented for the paper tape reader. It operates 
the same as read USASCII except for the following characteristics: 

The entire 8 -bit character is stored unmodified. 

No characters are ignored; deletes and null frames are stored. 

There is no end of record character. 

No end of file record is recognized. 

Read direct paper tape on an ASR33 type device does not always read 
the number of characters for which the device was opened. The user 
should depend on the returned (PRB word) character count. 
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3.8.3.2 ERROR DETECTION. The DSR detects invalid punches during a 
read binary operation only. An illegal operation aborts the job. 

3. 8. 3. 3 END OF FILE RECORDS. In USASCII and Binary modes any rec- 
ord beginning with a slash-asterisk (/*) is detected as an end of file record. 
For Binary mode the "/*" record is not stored in memory. 

3. 8. 4 PAPER TAPE PUNCH DEVICES 



mw/>n ^s*^** 



«v^ x _ 1 jaTT^ I norvjai* !• 



ay6 1 bapCS in cLj.x 



USASCII, Binary, or Direct format. Support is provided for ASR33 type de- 
vices and high speed paper tape punches. 

Table 3-8. Binary Internal Code to Paper Tape Binary Code 



Internal 


Tape Code 


Code 


Frames 





00010 000 


1 


00000 001 


2 


00000 010 


3 


10000 011 


4 


00000 100 


5 


00010 101 


6 


00010 110 


7 


10010 111 


8 


10011 000 


9 


00011 001 


A 


00011 010 


B 


10011 011 


C 


00011 100 


D 


10011 101 


E 


10011 110 


F 


00011 111 
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3.8.4. 1 RECORD FORMATS. USASCII records are written as one frame 
per character. Data is punched directly from the data buffer with no conver- 
sions. Each record is terminated with a Carriage Return (CR), Line Feed 
(LF), reader-off character (X-off), and two delete (rubout) characters, and 
a punch-off character if the device is a Model 33 ASR. Binary records are 
punched as four frames per word. The end-of-record indicator is the same 
as for the USASCII write operation, without the carriage return and line feed. 
Write Direct punches data directly from memory as in a USASCII write oper- 
ation, but no end-of-record indicator is added to the punched data. Write 
Direct is not supported on Model 33 ASR paper tape punches. 

3.8.4.2 ERROR DETECTION. The punch does not detect punch errors. 

3.8.4.3 END OF FILE RECORDS. An end of file record is defined for 
both Binary and USASCII modes as a record beginning with "/*". A write end 
of file punches a "/*" followed by CR, LF, X-off and two delete characters, 
then a 10 inch blank tape trailer. 

3.8.4.4 OTHER OPERATIONS. Open-rewind punches 10 inches of leader 
on the paper tape punch. 

3.8.5 DMAC AND I/O BUS LINE PRINTERS 

Characters are printed directly from the user's data buffer. If the formatted 
USASCII bit in the PRB is set, the first word of the data buffer is used for 
format control. 

3. 8. 5. 1 STATUS. If the printer is in a Not Ready condition (as opposed 
to offline), the DSR prints a Printer Not Ready message on the system con- 
sole terminal. Offline status is not detectable. 

3.8.5.2 ERRORS. The calling program aborts on illegal operations. If 
the device is not ready, the DSR generates retry errors. 

3. 8. 5. 3 I/O BUS PRINTER. A carriage return precedes any form feed 
operation. Bold letter records may be output by setting bit 1 in the user set 
flags of the PRB. Bit 1 instructs the line printer to overprint the line with 
redundant text. 

3.8.5.4 OTHER FUNCTIONS. The page moves to top of form when the 
following operations are done: 

• Rewind 

• Open Rewind 

• Close and Write EOF 

• Write EOF 
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The printer performs a carriage return and a line feed when it receives an 
Open command, 

3.8.6 CARD READER 

For handling formatted I/O records, cards are considered as a hard-copy 
medium rather than a storage medium. Therefore, do not punch the format 
control characters when preparing the input deck. In addition the deck must 
follow an implied one-record-per-card structure. The following restric- 
tions are imposed upon cards as a storage medium: 

• An implied CR/LF on every record 

• Each blank line is indicated by a blank card 

• A form-feed cannot be stored 

• A maximum limit of 80 -characters per record. 

3.8.6.1 RECORD FORMATS. USASCII records actually appear as Holler- 
ith punches on the cards. An USASCII read operation causes the DSR to con- 
vert the Hollerith characters to USASCII characters. Table 3-9 lists the | 
characters and their Hollerith and USASCII codes. Binary records are 
punched two characters per card column as shown in Table 3-10. I 

Read Direct (opcode 20) reads a card without any data conversion. The data 
is stored in memory as one card column per word. The word is right - 
justified with bits through 3 equal to 0. The least significant bit in memory 
represents card row 12 (top of card). The input record length must be given 
in characters, or 8-bit bytes, and requires a character count of twice the 
number of columns to be stored. If the character count is odd, only one byte 
of the last column is stored. That byte is stored in the most significant half 
of the buffer word; 

3.8.6.2 ERROR DETECTION. The DSR detects errors for timing and in- 
valid punches. A timing error occurs when either an interrupt for one card 
column is not serviced before the next is read, or when the punches in the 
card are out of alignment. Not all mispunched card columns are detectable. 
The DSR detects all invalid binary punches. Mispunched USASCII characters 
that are not detected as errors are converted to valid USASCII characters. 

3.8.6.3 END OF FILE RECORDS. A card with a slash-asterisk (/#) in 
the first two columns represents an end of file record in both Binary and 
USASCII modes. 

3. 8. 7 DUMMY DEVICE 

The dummy device handles all possible operations. All necessary system 
set flags are returned. For example, read operations set the end of file bit. 
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Table 3-9. USASCII Character Internal Code 
to Hollerith Code Conversion 



USASCII 
Code 


Hollerith 
Code 


Character 


USASCII 
Code 


Hollerith 
Code 


Character 


20 


No Punche s 


SP 


40 


8r4 


@ 


21 


12- 8- 7 


j 


41 


12-1 


A 


22 


8-7 


n 


42 


12.2 


B 


23 


8-3 


# 


43 


12.3 


C 


24 


11.8-3 


$ 


44 


12.4 


D 


25 


0-8-4 


% 


45 


12.5 


E 


26 


12 


& 


46 


12.6 


F 


27 


8-5 


i 


47 


12.7 


G 


28 


12-8-5 


( 


48 


12.8 


H 


29 


11-8-5 


) 


49 


12.9 


I 


2A 


11-8-4 


* 


4A 


11 .1 


J 


2B 


12-8-6 


+ 


4B 


11 .2 


K 


2C 


0.8-3 • 


9 


4C 


11 .3 


L 


2D 


11 




4D 


11 .4 


M 


2E 


12-8-3 


• 


4E 


11 .5 


N 


2F 


0-1 


/ 


4F 


11.6 


O 


30 








50 


11 .7 


P 


31 


1 


1 


51 


11 .8 


Q 


32 


2 


2 


52 


11 .9 


R 


33 


3 


3 


53 


0.2 


S 


34 


4 


4 


54 


0.3 


T 


35 


5 


5 


55 


0.4 


U 


36 


6 


6 


56 


0-5 


V 


37 


7 


7 


57 


0.6 


W 


38 


8 


8 


58 


0-7 


X 


39 


9 


9 


59 


0.8 


Y 


3A 


8-2 


: 


5A 


0.9 


Z 


3B 


11-8-6 


> 


5B 


12 .8 .2 


[ 


3C 


12-8-4 


< 


5C 


0.8 .2 


\ 


3D 


8-6 


= 


5D 


11.8.2 


] 


3E 


0-8-6 


> 


5E 


11.8.7 


) 


3F 


0-8-7 


9 


5F 


0.8.5 


1 



3.8.8 16 INPUT/16 OUTPUT DATA MODULE 

This DSR does not support interrupt processing. The 16 I/O Data Module is 
not compatible with any other I/O device, and has its own functions and op- 
codes. They are listed in table 3-11.' Figure 3-2 illustrates the Data Module 
PRB. 
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Table 3-10. Binary Character Internal Code 
to Binary Card Code Conversion 



Internal Code 


Card Code 


Internal Code 


Card Code 


Most 


Least 




Significant Rows 


Significant 


Rows 


Digit 12-11-0-9 


Digit 


8-1-2-3-4-5-6-7 


Blank 





blank 


1 9 


1 


1 


2 


2 


2 


3 0-9 


3 


3 


4 11 


4 


4 


5 11-9 


5 


5 


6 11-0 


6 


6 


7 11-0-9 


7 


7 


8 12 


8 


8 


9 , 12-9 


9 


8-1 


A 12-0 


A 


8-2 


B 12-0-9 


B 


8-3 


C 12-11 


C 


8-4 


D 12-11-9 


D 


8-5 


E 12-11-0 


E 


8-6 


F 12-11-0-9 


F 


8-7 


Example: The binary card character for hexadecimal CA is 


12-11-8-2. 





3.8.9 AD / D A DEVICES 

Figures 3-3 and 3-4 illustrate the PRE for Analog -to -Digital converters and 
Digital-to -Analog converters, respectively. 

3.8.10 MAGNETIC TAPE 

The TI Model 979 Magnetic Tape Unit is a standard peripheral of the mini- 
mum DX980 hardware configuration. 

This unit is a 1/2 inch, 9 track, IBM compatible format, 800 bits per inch 
tape drive. It uses an NRZI recording format with a standard fixed speed of 
37 1/2 inches per second. 

A detailed description of the unit is contained in the Model 979 Tape Trans- 
port Operators Manual, part number 216316-9701. 
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Table 3-11. 16 I/O Data Module Instructions 



Op Code 


Function 


30 


Reset - Initialize Data Module logic. 


31 


Output Word - Transfers a word from computer to Data 




Module. 


32 


Output Bit - Transfers a single bit from computer to a 




specified bit of the Data Module. 


33 


Read Status - Transfers current Data Module status to 




computer. 


34 


Read Data - Transfers a word from Data Module input 




lines to computer. 


35 


Read Output Register - Transfers the contents of the 




Data Module Output lines to the computer. 


7 


Open - Initialize the Data Module and set-up PRB. 


9 


Close - Terminate I/O operations. 





7 


8 


1 5 


WORD 


SYSTEM SET FLAGS 


LUN 


WORD 1 


USER SET FLAGS 


OP CODE 


WORD 2 


OUTPUT DATA 



(A)1 29984 



Figure 3-2. Data Module PRB 
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WORD 

WORD 1 

WORD 2 

WORD 3 



7 


8 15 


SYSTEM SET FLAGS 


LUN 


USER SET FLAGS 


OP code® 


ZEROS 


OPERATION DEFINITION 
TABLE (ODT) ADDRESS 



WORD 
WORD 1 

WORD 2 
(A)1 29985 



ODT FOR A/D 


15 


DEVICE ADDRESS ® 


CHANNEL 


GAIN® 


RETURNED CONVERTER INPUT 



notes: 

operation codes. 

|4, 6 = a/d conversion 
14 requested 



16" 



OPEN 



09 16 = CLOSE 

(5) THE DEVICE ADDRESS RANGE 
W IS 0-63 AND IS SELECTED BY 
SWITCHES INSIDE THE A/D 
CONVERTER ASSEMBLY. 

(3) GAIN ONLY APPLIES TO 7480/20 
^ OR 7480/22 



Figure 3-3. Analog-to-Digital Converter PRB 



7 8 



15 



word o 



WORD 1 



WORD 2 



WORD 3 



SYSTEM SET FLAGS 


LUN 


USER SET FLAGS 


OP CODE® 


ZEROS 


OPERATION DEFINITION 
TABLE (ODT) ADDRESS 



WORD 



WORD 1 



WORD 2 



(A)129986 



ODT FOR D/A 



DEVICE ADDRESS 



DATA OUTPUT WORD 



CHANNEL 



15 



notes! 
®. operation codes 

13, c =d/a operation 

16 13 REQUESTED 



07 16 =OPEN 
09 16 = CLOSE 



Figure 3-4. Digital-to-Analog Converter PRB 
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SECTION IV 
DISC FILE MANAGEMENT 



4. 1 FILE STRUCTURES 

A DX980 file is a logical collection of related data stored on a random access 
j^„,.;„g p^ file consists of a number of lo cr ical records eacn containing a col- 
lection of related data items that the program treats as a unit. Logical rec- 
ords may also combine to form a physical record. A physical record is a 
collection of data items that the operating system treats as a unit when trans- 
ferring data between main memory and the random access device. DX980 
supports two types of record transfers: blocked and unblocked. An unblocked 
file exists if each physical record in the file consists of a single logical rec- 
ord. If the physical records contain more than one logical record, the file 
is described as blocked. 

4.2 FILE HANDLING 

When the program issues an I/O call for a file transfer, the file management 
system intercepts the call. For output operations, the logical record indi- 
cated by the Physical Record Block (PRB) is transferred to a physical rec- 
ord buffer. If the logical record transfer completes the physical record, the 
physical record is transferred to the random access device. Similarly for 
input operations, a physical record may be transferred from the device to 
the buffer. The buffer then supplies logical records to the program until all 
logical records are used. At that time a new physical record is retrieved 
from the device. Thus, several logical record transfers can be made at 
memory speed before a single transfer at peripheral speed. This arrange- 
ment can minimize transfer time in programs with a high degree of I/O ac- 
tivity. 

4.2.1 MEMORY. ALLOCATION 

The operating system allocates memory space for physical record buffers 
from the user program's job extension area (<jearea>) when the user opens 
a file. The memory space is released when the user closes the file. The 
Job Control Language ( JCL) tells the system that a file is blocked and the 
number of physical record buffers to be allocated. The job area (<jarea>) 
for the user program provides memory space for logical record buffers. 
The user can provide this space explicitly by using a Block Starting with 
Symbol (BSS) directive in an assembly language program or implicitly with- 
in the Fortran Input/Output package when the program is run. 
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4.2.2 FILE INTEGRITY 

DX980 maintains file integrity through access restriction and through file 
locking. When the file is defined or assigned, the user specifies access re- 
strictions for operations on the file of reading, writing, executing and de- 
leting the file. He can restrict access completely for any of the operations 
(NONE), he can allow access to anyone (ANY), or he can selectively restrict 
access to either the creator of the file (CREAT) or to those having the proper 
password (PSWD). Following this initial definition of access restrictions, 
DX980 enforces them for each type of file operation. 

In addition, DX980 provides three levels of file locking: 

1. Assigned exclusive 

2. Assigned shared - open exclusive 

3. Assigned shared - open shared, then lock 

The first type provides an exclusive access to the file until the file is deas- 
signed through job step termination if the file is not being passed, or through 
job string termination if the file is passed from one step to another. Ex- 
clusive access can also be removed through runtime resource deallocation. 
The second type of file locking provides exclusive access to the file until the 
file is closed. The third type of file lock secures the file on an operation by 
operation basis. The file is locked by setting a bit in the User Set Flag area 
of the PRB for that operation. This type of lock secures the entire file 
rather than a single record. Also, the user is not locked out unless he spe- 
cifies the lock by setting the bit in the PRB. 

4. 3 DISC ORGANIZATION 



The operating system allocates file space and maintains disc directories to 
support both DS330 and moving head discs. DX980 uses two levels of direc- 
tories: 

• one master file directory for each disc pack (<volume>) 

• a user file directory for each user (<fileid>) on each disc 

These directories are standard indexed files with a physical record size of 
96 words. For a single master file directory, this indexed file contains 
keyed entries consisting of file control blocks for each user file directory. 
The file control blocks are keyed on each valid user <fileid> in the system. 
A particular user file directory contains keyed entries consisting of file con- 
trol blocks for each file defined under the user. The file control blocks are 
keyed on the file name <filenam>. 

Each user file directory identifies files by file name (<filnam>). Thus, a 
user can have several files under a particular user file directory on each 
disc volume. If an installation has a single disc drive, all packs to be 
mounted on that drive must also contain the operating system. For multiple 
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drive installations one drive, designated as the system disc, supplies the op- 
erating system plus user files. The remaining drives are dedicated complete 
ly to user files. The selection of the drive or volume for file storage is a 
JGL assignment parameter. 

The operating system employs two techniques for file allocation: contiguous 
allocation and noncontiguous allocation. Contiguous allocation places the en- 
tire file on consecutive disc tracks (disc tracks are numbered consecutively 
from through the total number of tracks on the disc; the last track on one 
disc cylinder and the first track on the next cylinder are numbered consecu- 
tively on a moving head disc). Noncontiguous allocation is accomplished 
dynamically as the file grows on a track-by-track basis. The initial alloca- 
tion for noncontiguous files is specified as a JCL parameter and may be any 
number of tracks. The entire initial allocation is assigned to consecutive 
tracks. As I/O operations add records to the file and the initial allocation 
is used up, additional tracks are allocated one at a time from any available 
disc space. As each additional track is used up, another is added until the 
final allocation limit, specified in JCL as <mtrks>, is reached. The file 
management system can also start searching for the initial allocation quan- 
tity (or total quantity for contiguous allocation) at a particular track 
<trknum>. This user option minimizes head movement by grouping together 
files to be processed by a program. 

4.4 FILE TYPES 

DX980 supports three types of files: linked sequential, relative record and 
key indexed files. The following paragraphs explain each of these file types. 

Table 4-1 summarizes the features of each file type. 

4.4. 1 LINKED SEQUENTIAL FILES 

Linked sequential files are files whose records can only be reached through 
sequential access. File allocation is noncontiguous. The operations sup- 
ported on a Linked Sequential File are identical to those outlined in Section 
III for I/O to sequential devices. A linked sequential file supports an im- 
bedded end of file so that a single linked sequential file can replace a multiple 
file stack on a sequential access device (for example an entire reel of mag- 
netic tape). The random access capabilities of the disc facilitate the search 
file operations. A record cannot be inserted between two existing records. 
Individual records cannot be deleted. An end of medium pointer always fol- 
lows the last write performed. This end of medium is equivalent to an end 
of volume on a tape reel. 
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Table 4-1. Summary of DX980 File Features 



Parameter 




File Type 




Linked 
Sequential 


Relative 
Record 


Key Indexed 


Access 


Sequential 


Sequential; 


Sequential; 






Random 


Random 


Allocation 


Noncontiguous 


Contiguous 


Noncontiguous 


Logical Order 


Chronological 


Disc Address 


Keyed; alphabetic 
Nonkeyed; Chron- 
ological after key 


Key 


None 


15 -bit Binary 
record number 


1-30 byte 


Transfer 


Blocked 


Direct (LR = PR) 
Blocked (LR<PR) 


Blocked 


Physical Record 


Multiple of 32 


Multiple of 32 


Multiple of 32 


Length 








Logical Record 


Variable 


Fixed 


Variable 


Length 








Logical /Physi- 


LR= PR 


LR ^ PR 


LR < PR- 8 unkey- 


cal Record Re- 






ed; LR < PR-8- 


lationship 






KEY keyed where 
KEY=key 


Logical Record 


Yes 


No 


No 


Split Over Phy- 








sical Record 








Boundary 








Inter Job 


Last File 


Beginning of 


Beginning of 


: File Position 


(Position 


Medium 


Medium 



The logical record length for linked sequential files is always variable. 
Therefore word 2 of the PRB specifies the record length of each individual 
record when the record is written. When a record is read, the actual record 
length is returned in word 2 of the PRB subject to the maximum record length 
specified when the file was opened. Insofar as the I/O program is concerned, 
the physical record length of records stored on disc is transparent. If the 
physical record length is greater than logical record length, the number of 
actual disc transfers is less than the number of I/O calls* If the physical 
record length is less than the logical record length, the number of disc trans- 
fers will be greater than the number of I/O calls. Figure 4-1 illustrates the 
composition of a linked sequential file. 
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CONTIGUOUS 
FLAG 




WRITE 
FLAG 



>IOT SPLIT ACROSS SPLIT ACROSS 
PHYSICAL RECORD BOUNDARY PHYSICAL RECORD BOUNDARY 









n 


nDATA BYTES 








n-x 

DATA BYTES 



X DATA BYTES 



WRITE VERIFY 
FLAG 

\:BUFFER FULL FLAG 
\ \ UNUSED 



V UNU 



READ DISC ADDRESS 
OF PHYS REC 



FORWARD TRACK 
POINTER 



INDEX TO END +1 

OF LAST RECORD 

IN BUFFER 



LR 
(LOGICAL RECORD) 



PARTIAL LR 



PHYSICAL RECORD 
BOUNDARY 



PHYSICAL RECORD 

(DATA TRANSFER 
> TO/FROM STORAGE 
^ SERVICE) 

(SIZE= <PRWRDS) WORDS) 



(A)130321A 



EtfF RECORD STRUCTURE 



BACK EOF POINTER_ 
(0 FOR FIRST EOF) 



BACK EOF INDEX 



FORWARD EOF 

— POINTER — 

(0 FOR LAST EOF) 



FORWARD EOF INDEX 
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Figure 4-1. Linked Sequential File Parameters 
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4. 4. 2 RELATIVE RECORD FILES 

A relative record file allows random access in addition to sequential access 
for locating records within the file. The random access method uses a num- 
ber to directly specify the numerical position of the record within the file. 
The first record is designated as record number 0. Records may be added 
to the file using either access method. Existing records in the file may be 
changed or read using either access method. A record cannot be inserted 
between two existing records. Single records cannot be deleted. The oper- 
ating system does not support an end of file interior to the file. 

File allocation for a relative record file is contiguous so that the size of the 
file must be specified when the file is defined. The entire contiguous data 
area assigned to the file is partitioned into fixed length logical records. If 
blocking is specified, the blocking buffer length (physical record length) 
must be larger than the logical record length. In either case access to a 
record does not require a directory search. A maximum of one disc access 
is required to fetch a record by either method and may be none if the record 
is within a blocked physical record that is in the buffer. 

A relative record file is unblocked if the logical record length is equal to 
physical record length. For unblocked files the file management system does 
not create an intermediate buffer in the job extension area. Instead, it trans- 
fers the data directly to or from the logical record buffer specified by the 
PRB. This direct transfer requires a disc transfer for each I/O call, and 
increases the running time of the accessing program, but reduces the mem- 
ory requirements due to a smaller job extension area. Figure 4-2 illustrates 
both blocked and unblocked transfers. 

The operating system supports the following random access functions: 

• Write /Replace using key - Data record with same numeric key to be 
replaced with new data record. 

• Replace using key - same as Write /Replace using key. 

• Read using key - Read the logical record as specified by the key. 

A.ny access to a record in the file (read or write, random or sequential meth- 
od) establishes a logical position that follows the record previously accessed. 
This logical position has no effect on a subsequent random access operation, 
but defines the location for a subsequent sequential operation. 

4. 4. 3 KEY INDEXED FILES 

A key indexed file allows random access in addition to sequential access for 
locating records within the file. The operations allowed for both random and 
sequential access methods are considerably more powerful than those allowed 
for either linked sequential or relative record files. Key indexed files are 
noncontiguous . 
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Figure 4-2. Relative Record File Transfers 
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The key for random access within a key indexed file is an n-byte name 
(n<30 USASCII bytes or binary bytes). The number of bytes in the key is 
fixed for all keyed records in the file when the file is defined. However, dif- 
ferent key indexed files may have different key sizes. Keyed records are 
added by setting a bit in the PRB (random access method). Records without 
a key are added sequentially to the file. Records that are placed sequentially 
in the file without a key can only be retrieved with the sequential access meth- 
od. No two records may have the same key (name). Most of the sequential 
access capabilities of key indexed files are identical to those described in 
Section III for sequential I/O devices. Insertion of a nonkeyed record is also 
allowed. 

4.4.3. 1 RANDOM ACCESS FUNCTIONS. The operating system supports 
the following random access functions: 

Read using key - With option to delete record and key. 

Write insert using key - Presence of same key considered error. 

Write replace /add using key - Data record with same key to be 
replaced with new data record. 

Delete at record level - keyed and non-keyed records. 

Read next higher or lower key. 

4.4. 3. 2 SEQUENTIAL ACCESS FUNCTIONS. When performing a sequen- 
tial access read within a key indexed file, logical records are retrieved in 
increasing order of key with the key treated as an unsigned integer (the order 
is alphabetical if the key is USASCII bytes). Unnamed records are positioned 
in the file as sequential records following either a keyed record or the be- 
ginning of file. Any access to a record in the file (read or write, random 
or sequential method) establishes a logical position that follows the accessed 
record. This logical position has no effect on a subsequent random access 
operation, but defines the location for a subsequent sequential access opera- 
tion. 

4.4. 3. 3 LIBRARY MANAGEMENT. Libraries consisting of groups of log- 
ical records identified with a common name are easily maintained through a 
combination of keyed and nonkeyed records in the same file. For example, 
a source program library could be written with a keyed record for the first 
source record. The remaining records in the program would be nonkeyed, 
sequential records. To retrieve a program, the system first performs a read 
using key to locate the start of the program. Subsequent sequential read op- 
erations retrieve the remaining records. The Key Recovery Desired bit in 
the PRB (word 1, bit 2) must be set during this operation so that the first 
time a key is returned, the system recognizes the corresponding record as 
the first record of the next program. This indication can be treated as an 
end-of-file if only one program is desired. If the program is the last in the 
file, the EOF flag (PRB word 0, bit 2) denotes end-of-file. 
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4.4. 3.4 MULTIPLE RECORDS WITH THE SAME KEY. If the operating 
system detects an existing identical key within the file while performing a 
write using key operation, it returns a logical error indication to PRB word 
0, bit 6. The user can still make an entry using that key, however. By per- 
forming a read using key operation to locate the key within the file, and then 
performing a sequential write without key at that location, the new record 
can be inserted at the beginning of a sequential string following the record 
with the target key. This operation generates a string of records for each 

v^ y L.nd.1. <->|-'^^j.cLuv^S S'-' Vi.xCi.L- bllC J.O.O l. X C \_ v_/ -L \_l x.xxOC;xi,C;v_l W 111 UC V/U111C uic i± x o L. x c C — 

ord obtained sequentially following the keyed record itself. 

4.4. 3. 5 BUFFER MANAGEMENT. A system wide buffering scheme pro- 
vides buffer management for key indexed files. A major factor in gaining 
access to a key-controlled data record is the number of disc accesses re- 
quired to search through the key structure. To minimize the number of ac- 
cesses and reduce search time, DX980 allows multiple memory buffers for 
storing keyed records. The minimum number of buffers per job for key 
indexed files is two: one buffer for keys and another for data. The operat- 
ing system provides two mechanisms for acquiring multiple buffers. The 
"BUFFERS=" parameter in the assignment command specifies the number 
of buffers to be allocated in the accessing program's job extension area. 

In addition if multiple programs are sharing a key indexed file, the buffers 
from all sharing programs are grouped together for searching purposes. 
The user should specify a sufficient number of buffers in his job extension 
area to achieve the access time required for the application. If the file is 
being shared, the access time will be less than anticipated. 

4. 4. 3. 6 BUFFER SIZE. Buffer size .selection for key indexed files is 
based on the length of each key, the number of keyed records in the file, and 
the desired data access time. Access time for data records is approximately 
equal to the number of disc accesses required to find and retrieve the record, 
times the average seek time for the disc drive. The number of disc accesses 
to get a data record is approximately equal to l°g m n +l» where n is the num- 
ber of data records in the file and m is the number of keys in each physical 
record. The number of keys per physical record is equal to the physical 
record length minus four divided by the effective length of each key. The 
effective key length, including pointers and information about the data record, 
is five words plus the key length in words. Since key length is specified in 
characters in the JCL, the key length in words is the JCL specification di- 
vided by two and rounded up. The minimum buffer size specification must 
provide for two keys and at least one logical record: 14 words -f 2* (key 
length/2). In addition the buffer size must be a multiple of 32 words. 

Figure 4-3 illustrates the file structure for key indexed files. The terms 
used in the figure are defined in the following paragraphs. The structure is 
handled by DX980 rather than the user. The information is supplied for in- 
creased comprehension only. 
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Figure 4-3. Key Index File Parameters 
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4.4.3.7 LOGICAL RECORD. The logical records include both data and 
control fields for operating system use. The control area of the record is 
comprised of the following fields: 

• Forward Pointer Address (FPA) - This two word space in each log- 
ical record contains the disc address of the physical record contain- 
ing the next logical record in a linked file. 

• Forward Pointer Index (FPI) - This one word area in the logical rec- 
ord designates the relative position of the next logical record within 
the physical record specified by FPA. 

• Backward Pointer Address (BPA) - This two word space in each log- 
ical record contains the disc address of the physical record contain- 
ing the previous logical record in a linked file. 

• Backward Pointer Index (BPI) - This one word area in the logical 
record designates the position of the next logical record within the 
physical record specified by BPA. 

• Key Flag - The operating system sets this bit to indicate that the 
logical record has a key associated with it. 

• Delete Flag - The operating system sets this bit to indicate that 
the logical record has been deleted from the file. 

t-i j. r~< i. T-ui- ci _i j .:_j.: i i-"U ~ T ^£ U, ,•<-,. .-, „^„i-~.: 3 
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in the data (text) field of the logical record. 

• Key - If the Key Flag is set, this field contains the key for the log- 
ical record. 

4.4. 3. 8 DATA PACKAGE BUFFER. The data package buffer contains log- 
icai records ana a iraci\ puimex" men- luiuj/hbc mc ^nyoj.^a.x ic^uiu o i.vs j. «~ u ^^ 
the disc, plus control information used by the operating system. The num- 
ber of buffers allocated in a particular job is specified by the user through 
the <nbufs> parameter in JCL. 

T rack Pointer. The track pointer becomes part of the physical record on 
the disc. If the record is the last record on a track, it points to the address 
of the track containing the next physical record of the file. For the first 
physical record on a track, this field is used for a pointer to the previous 
track of the file. For interim records on a track, this field is not used. 

Data Package Control. The control area of the buffer is comprised of 
the following fields: 

• User Buffer Pointer - This field contains the main memory address 
of the first buffer assigned to the current user of the buffer. 
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• Forward Pointer (FP) - This one word field contains the main mem- 
ory address of the next buffer in a series of buffers assigned to a 
job. 

• Backward Pointer (BP) - This one word field contains the main mem- 
ory address of the previous buffer in a series of buffers assigned to a 
job. 

• Write Flag - When a user alters the information contained in a file 
buffer, the Write Flag sets. When set, this flag indicates to the op- 
erating system that the physical record must be written back to the 
disc before it is discarded after being used. This flag ensures that 
the changed data will be recorded in place of the old data on the disc. 

• Write Verify Flag - When set, this flag indicates that the operating 
system must read data back from the disc following a write to ensure 
that the record was stored accurately. 

• Busy Count - This field contains the number of users that are cur- 
rently using the buffer. When the count equals zero, the system can 
replace the buffer contents with new information. 

• Real Disc Address (RDA) - This two word field contains the disc ad- 
dress of the physical record currently in the buffer. 

4.4. 3. 9 KEY DIRECTORY BUFFER. The key directory buffer is identical 
to the data package buffer, except that the logical record fields of the data 
package buffer are replaced with nodes of the sorting tree used to locate a 
particular key. Each node contains one control word that specifies if the 
node is a bottom node or an intermediate node, and that also indicates the 
number of keys contained in the node. The remainder of the node contains 
key packages, and if it is an intermediate node, pointers to the next lower 
level node in the sorting tree. 

Lower Level Pointers . If the desired key is not contained in a current node, 
the operating system must access another block of keys (node) to locate the 
key. The system searches the current node until it finds the first key that 
is logically greater than (alphabetically past) the desired key. Associated 
with each key is a two word pointer. The pointer is the disc address of the 
node that contains keys in the level of the sorting tree below the associated 
key. The operating system uses that pointer to access the next node for the 
search. All of the keys in next lower level node are sorted and are alpha- 
betically between the surrounding keys at the higher level. 

Key Package. The key package consists of the following fields: 

• Delete Flag - The operating system sets this bit to indicate that the 
key and its associated logical record have been deleted from the file. 
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• Data Pointer - This 24-bit field contains the disc address of the 
physical record that contains the logical record associated with the 
key. 

• Index - This one-word field designates the position of the correct 
logical record within the physical record indicated by the data 
pointer. 

• Key - This field contains a name that is from 1 to 30 bytes long and 
that identifies the logical record within the file. This key is re- 
peated in the control field of the logical record associated 

with the key. 

4. 4. 4 FILE ERRORS 

As with I/O devices, three levels of errors can result from a SVC to per- 
form file I/O. The conventions described in Section III for I/O errors apply 
to file errors also. Table 4-2 lists the possible file errors together with 
their associated severity and error number. 

4. 5 PHYSICAL RECORD BLOCK 

The Physical Record Block (PRB) for file I/O is similar to that for device 
I/O as outlined in Section III except for the key address field (word 4). The 
PRB is four words in length unless bit 1 of word 2 is set* That bit indicates 
the presence of the key address in a fifth word. Key address is used by key 
indexed or relative record files. The field points to the memory address in 
the user program where the key can be located. For relative record files the 
indicated key contains a 15-bit binary value within the range of to 32, 767. 
Bit of this word must be zero and bits 1 through 15 contain the record 
number. This number indicates the logical record number within the partic- 
ular relative record file. For key indexed files the key contains a block of 
from 1 to 15 words (1 to 30 bytes) that functions as an alphanumeric byte 
string or a binary number. The length of this block (key) is specified with 
JCL. The key constitutes the name of the referenced logical record. Keyed 
reads and writes require both a key and a logical data record pointer. Table 
3-4 outlines the opcodes that are applicable to I/O for relative record and key- 
indexed files. Linked Sequential Files are accessed with I/O calls as de- 
scribed in Section III. 
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Error 
Number 



233 
234 



235 



256 

257 
258 



Severity- 



Severe 
Severe 



Logical 



236 


Severe 


237 


Logical 


238 


Logical 


239 


Logical 


240 


Logical 


241 


Logical 


243 


Logical 


250 


Severe 


251 


Severe 


252 


Severe 


254 


Severe 



Severe 

Fatal 
Severe 



Table 4-2. File Errors 



Description 



No space available on disc volume 

File full. File status: can only be accessed for 
reading. No additional records can be written into 
the file, not even following a rewind operation. To 
reuse the disc space the file must be replaced. 

Attempted write, logical record greater than 
physical record 

Hardware failure on disc volume 

Key indexed file - replace attempted on non- 
existent key 

Key indexed file - write attempted on existing key 

Key indexed file - write/replace (op code 101) 
attempted without specifying key. 

Key indexed file - replace (op code 102) attempted 
on a keyed record without specifying key. 

Key indexed file - replace (op code 102) attempted 
when file was positioned at EOF, 

Key indexed and relative record files - no key 
match in the file 

Insufficient tracks available for allocation 

Insufficient contiguous tracks left for allocation 

Allocation exceeds disc volume capacity 

Unable to allocate buffers, job extension area too 
small 

Insufficient number of buffers for attempted oper- 
ation 

Opcode is either non-existent or illegal 

Access violation for integrity code 
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Table 4-3. Relative Record and Key Indexed File Management Opcodes 



I/O 
Code 


Operation 


File 

Type 


Function 


100 


Write 


R. R. 


Fatal error - Must use Replace (102) or Write/Replace (101) 






K.I. 


Write a logical record from the user's buffer to disc. 








1) 


Key specified: 

a) If the specified key already exists in the file, do not write 
the logical record to disc. Return logical error status to 
the user, and do not reposition file pointer. 

b) If the specified key does not exist, make a key-directory 
entry for the key and write the logical record to disc under 
the new key entry. Position file pointer beyond completed 
write. 








2) 


Key not specified: Insert the nonkeyed record where the file 
pointer is positioned; advance pointer. 


101 


Write/ 


R. R. 


Pe 


rform a replace operation. 




Replace 




1) 
2) 


Key Specified: Replace the logical record of the specified key 
with the logical record from the user's buffer. Position file 
pointer for next sequential record. 

Key not specified: Replace the record where the file pointer is 
positioned and advance the file pointer. 






K.I. 


Unconditionally write the logical record from the user' s buffer to the 
disc. 








1) 


Key specified: 

a) If the specified key exists in the key-directory, replace the 
logical record associated with the key with the logical rec- 
ord from the user's buffer. Position file pointer to next 










sequential record. 
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Table 4-3. Relative Record and Key Indexed File Management Opcodes (Continued) 




I/O 
Code 


Operation 


File 
Type 


Function 


101 






b) If the specified key does not exist, make a key-directory 


(Cont) 






entry for it, and write the logical record to disc under the 
new key entry. Position file pointer to next sequential rec- 
ord. 

2) Key not specified: Return an error status (number 239) to the 
user. Do not reposition file pointer. 


102 


Replace 


R.R. 


Replace the logical record on the disc with the logical record from 
the user's buffer. 

1) Key specified: Replace the record specified by the key and posi- 
tion file pointer to next sequential records. 

2) Key not specified: Replace record where the file pointer is 
positioned and advance the pointer. 






K.I. 


Replace the logical record on the disc with the logical record from 
the user's buffer. 

1) Key specified: Replace the record specified by the key and posi- 
tion file pointer to next sequential record. If key does not exist, 
return error and do not reposition file pointer. 

2) Key not specified: Replace record indicated by file pointer and 
advance pointer. If record to be replaced has a key, then return 
a logical error (number 240 or 241). Do not reposition file pointer. 


103 


Read 


R.R. 


Read the logical record from the disc into the buffer specified by the 
user. 

1) Key Specified: Transfer logical record associated with specified 
key and position pointer to next sequential record. 
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I/O 
Code 


Operation 


File 
Type 


Function 


103 






2) 


Key not specified: Read record indicated by the file pointer and 


(Cont) 








advance pointer. 






K.I. 


Read the logical record from the disc into the user' s buffer. 








1) 


Key Specified: 

a) Read the logical record as specified by the key from the 
disc into the user's buffer. Position file pointer to next 
sequential record. 

b) If the specified key is not in the key-directory, return an 
error status to the user. Do not change file pointer. 








2) 


Key not specified: 

a) Read the record indicated by the file pointer and advance 
pointer. 

b) If a keyed record is encountered and the PRB specifies that 
key recovery is desired, return the key to the user in the 
area allocated for the key. If key recovery is not desired, 
do not return the key. 








3) 


No data desired: By setting the "return record size only" bit in 
the PRB a user can issue a Read and no logical record data is 
transferred. The size of the logical record is returned in the 
Data Record Length field of the PRB. Functions 1 and 2 above 
apply. 
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I/O 
Code 


Operation 


File 
Type 


Function 


104 


Read High 


R.R. 


Fatal error 






K.I. 


Read the 


logical record from the disc into the user' s buffer. 








1) Key Specified: 








a) 


If the exact specified key exists in the key-directory, read 
the logical record associated with it. Position pointer to 
next sequential record. 








b) 


If the specified key does not exist, find the next algebraically 
higher key in the key -directory and read the logical record 
associated with it. Return the key that was actually found to 
the key field addressed by word 4 of the PRB. Position the 
pointer to next sequential record beyond retrieved record. 








c) 


If the specified key does not exist and no algebraically higher 
key exists in the key-directory, return an error status (end 
of medium) to the user. Do not reposition pointer. 








2) Key 


not specified: Use the forward sequential-access method to 








find the next key in the key-directory beyond the record indicated 








by the file pointer. 








a) 


Return the key to the user if a keyed record is found and if 
the key recovery bit is set in the PRB. Put the associated 
logical record in the user's buffer. Position file pointer to 
next sequential record. 








b) 


If no keyed record is found, return an error status (end of 
medium) to the user. Position pointer past last data record 
in file. 
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Code 


Operation 


File 
Type 


Function 


105 


Read Low 


R.R. 


Fatal error 






K.I. 


Re 

1) 

2) 


ad thelogical record from the disc into the user's buffer. 
Key Specified: 

a) If the specified key exists in the key-directory, read the 
logical record associated with it. Position pointer to next 
sequential record. 

b) If the specified key does not exist, find the next algebrai- 
cally lower key in the key -directory and read the logical 
record associated with it. Return the key that was actually 
found to the key field addressed by word 4 of the PRB. Posi- 
tion pointer to next sequential record. 

c) If the specific key does not exist, and no algebraically 
lower key entries are in the key-directory, return an error 
(beginning of medium) status to the user. Do not change 

•file pointer. 

Key not specified: Use the sequential access method to find the 
next key in the key-directory going backwards from the current 
file pointer position. 

a) If a keyed record is found, return the key to the user (if the 
key recovery bit is set in the PRB) and put the associated 
logical record in the user's buffer (if data is to be trans- 
ferred). Position file pointer to record following the record 




, 






used. 
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I/O 
Code 
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i 
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D 
CQ 
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Operation 



Read 
Delete 



File 
Type 



107 



Delete 



R.R. 
K.I. 



K.I. 



Function 



b) If no keyed record is found, return an error (beginning of 
medium) status to the user. Position file pointer to be- 
ginning of file. 

Fatal error 

Read the logical record associated with the specified key into the 
user's buffer. Then mark both the key entry in the key-directory 
and its associated logical record as deleted. Same rules apply as 
for Read (I/O code 103) plus Delete (I/O code 107) for K.I. files. 

Fatal error 

Mark the indicated record as deleted. 

1) Key specified: 

a) If the key exists, mark the specified key entry in the key- 
directory and its associated logical record as deleted. Any 
sequentially linked record(s) that exist for the specified key 
remain, but the associated key and its record are specif- 
ically marked as deleted. Position pointer to next record. 

b) If the specified key entry does not exist in the key-directory, 
return an error status to the user. Do not change file 
pointer. 

2) Key not specified: 

a) Mark the logical record at the current file pointer position 
as deleted. Increment the pointer to the next logical rec- 
ord. If the deleted record has a key, delete that key from 
the key-directory. 
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b) 


If the key recovery bit is set in the PRB and the next logi- 


(Cont) 








c) 


cal record contains a key, then return the deleted key to the 
user in the key field of the PRB. 

When the last logical record is deleted, the file pointer is 
incremented to point at the end of medium. Therefore, the 
appropriate status is returned to the user. 


108 


Delete 


R.R. 


Fatal error 




Sequentially 


K.I. 


Mark th< 


3 specified key entry, its associated logical record(s), and 








any 


sequentially linked logical record(s) up to, but not including, the 








next alg< 


sbraically successive key entry as deleted. 








1) 


Key 
a) 

b) 


Specified: 

If the key entry exists in the key -directory, mark it and any 
sequentially linked logical record(s) as deleted. If the key 
recovery bit is set, the next successive key is returned to 
the key field of the PRB. Position file pointer beyond de- 
leted records. 

If the key entry does not exist in the key-directory, return 
an error status to the user. Do not change file pointer. 








2) 


Key 
a) 


not specified: 

Begin at the current file pointer position arid mark the se- 
quentially linked logical record(s) up to, but not including, 
the next successive key entry as deleted. Position the 
file pointer beyond deleted records. 
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I/O 
Code 
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[Cont) 



109 



Operation 



Delete 
All 



File 
Type 



K.I. 



Function 



b) If the key recovery bit is set, return the next successive key 
to the user in the key field addressed by PRB Word 4. 

c) If an end of medium is detected, return the appropriate sta- 
tus to the user. 

Fatal error 

Mark all key-directory entries (key and non-key) and all logical data 
records in the file as deleted (delete all data contents of file to create 
an empty file). File allocation remains the same. 
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SECTION V 
SUPERVISOR CALLS 



5. 1 GENERAL 



DX980 supervisor calls (SVC) are requests to the operating system to per- 
form a service for the user. This request is the only communication between 
a user program an»u tue operating system, xne computer interprets an S v C 
as an illegal machine instruction. When the computer encounters an illegal 
instruction, it automatically branches (traps) to the internal interrupt entry 
address. The operating system examines all instructions that cause a trap 
to determine if they are SVC opcodes. If not, the instruction actually is 
illegal and the system aborts the offending program. If the instruction is an 
SVC, the operating system decodes the remainder of the instruction and calls 
the appropriate system service routine to process the SVC. 

For compatibility with the Basic Monitor System, DX980 recognizes two SVC 
instruction formats: C380 and F800. The C380 SVCs conform to SVCs for 
the Basic Monitor. However, the Basic Monitor call Set Control Status Flag 
(C384) is not recognized by DX980. The Basic System Use and Operation 
manual referenced in the preface to this manual explains Basic Monitor SVCs. 



L O U J- U.V* I 



(XX corresponds to the hexadecimal equivalent of the SVC number as de- 
scribed in this manual). To issue an F8XX SVC, construct an argument list 
that contains a word identifying the number of arguments described by the 
list, followed by successive words containing the addresses of each argu- 
ment. Then set the M register to the address of the list and allow the pro- 
gram to execute the SVC. For example, a Wait for I/O SVC is implemented 
as follows : 

(o^LDM = ARGLST 

DATA >F82B UB^ = 43 1Q , Specifies SVC 43) 



ARGLST DATA 1 , PRB Designates 1 Argument at Address PRB 

Supervisor calls can be specified in decimal form if the OPD (Operation De- 
finition) assembler directive is first used to define a new instruction mne- 
monic, SVC, that maps the decimal number to its hexadecimal equivalent. 
Then the statements: 

SVC 43 

and 
DATA >F82B 



are equivalent. 
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Table 5-1 summarizes the DX980 SVC. Table 5-2 lists and describes each 
SVC. The remaining paragraphs in this section provide examples of param- 
eter setup and calling sequences for each SVC, plus a more detailed descrip- 
tion. 



Table 5-1. DX980 User Supervisor Calls 



Base Ten 
SVC Number 


Function 





Input /Output 


1 


Terminate Job 


2 


Set Floating Point Address 


3 


Get Memory Limits 


4 


Terminate Job Abnormally 


5 


Terminate Task 


6 


Delete Task 


7 


Suspend Task 


8 


Post Event 


29 


Get Time and Date 


30 


Create Task 


37 


Load 


38 


Load and Relocate 


41 


Command Scanner 


43 


Wait for Input /Output 


49 


Allocate Resource 


51 


Deallocate Resource 


98 


Get Program Limits 


129 


Start Job 
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Table 5-2. DX980 Supervisor Call Description 








Number of 




Base Ten 
SVC Number 


Function 


Arguments, 
Name(s) 


Description 





I/O 


1, PRB 


Performs all I/O for the user as specified by 
the PRB. 


1 


Terminate Job 





Normal Job Termination 


2 


Set Floating Point 


1, FLT980 


Set floating point address to trap to for any 




Address 




floating point instructions. 


3 


Get Memory Limits 


1, ARRAY 


Get memory limits of user partition from job 
partition and return values in the supplied 
array. 


4 


Terminate Job 


1/2, ERRCOD, 


Abnormal Job Termination. Number of argu- 




Abnormally 


ERRID 


ments is either 1 or 2. First argument is 
ERRCOD, an error code supplied by the user 
(should be 1000 or greater). Second optional 
argument is ERRID, the address of a 6 char- 
acter identifier that the user supplies to identi- 
fy which error the ERRCOD applies to. 


5 


Terminate Task 





Normal Termination of the Running Task. 


6 


Delete Task 


1, TASKID 


Delete all tasks under the user job having the 
same name as TASKID. 


7 


Suspend Task 


1/2, WCL, 


Suspend the running task under the user job 






RETEDB 


waiting for event(s) as specified by the Wait 
Criteria List (WCL). RETEDB is optional; if 
specified, the task returns to the last matched 
Event Description Block (EDB) on which the 
match occurred. 


8 


Post Event 


1, EDB 


Post the event specified in the EDB. 
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Table 5-2. DX980 Supervisor Call Description (Continued) 




Base Ten 
SVC Number 



29 



30 



Function 



Get Time & Date 



Create Task 



Number of 

Arguments, 

Name(s) 



4, BTIM, BDAT, 
CTIM, CDAT 



Variable 



Description 



Return the System Time and date in the follow- 
ing parameters: 

BTIM = System Time in Binary (2 words, 

milliseconds since midnight) 
BDAT = System Date in Binary (2 words, 

year & day) 
CTIM = System Time in Characters (3 

words, HH : MM:SS) 
CDAT = System Date in Character (3 words, 

MM:DD : YY) 

The format of the date is year followed by day 
of the year (instead of the month). 

Create a task under the user job as specified 
by the following parameters : 

1) TPRI - Relative Task Priority 

2) TID - Task identifier (user specified 

binary number). 

3) TSTART - Starting location of first instruc- 

tion task is to execute. 

4) TREG - Pointer to a register file. If the 

pointer is -1, the register file 
for the new task is to be the same 
as the creating task. If not -1, 
the parameter is a pointer to the 
register file containing values to 
be passed to the new task. 



Table 5-2. DX980 Supervisor Call Description (Continued) 




Base Ten 
SVC Number 

30 
(Cont) 



Function 



Number of 

Arguments, 

Name(s) 



Description 



5) TSS - TCB STACK SIZE; number of 

words to be allocated in the 
auxiliary stack attached to the 
TCB. 

6) TWCL - Wait Criteria List - A linear ar- 

ray of one or more words. If the 
first word of this parameter is 
zero, the task is to be created in 
the Ready state. If the first word 
is non-zero, the parameter is the 
Wait Criteria List and the task is 
created in the Dormant state. 

The following input parameters are to be in- 
cluded only if the stack area for task creation 
is required. If no user supplied stack area 
setup is required, the parameter list ends 
here. 

7) TSTK - Pointer to user supplied stack. 

This stack, within the user par- 
tition, is required if the reen- 
trant task to be created requires 
work space. 

8) TWRK - Work Area flag. If zero, no 

work area is required. If non- 
zero, a pointer to the work area 
within the user supplied stack 
area is to be supplied. 
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Table 5-2. DX980 Supervisor Call Description (Continued) 




Base Ten 
SVC Number 
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30 
'Cont) 



Function 



37 



Load 



41 



43 



Load and Relocate 



Command Scanner 



Wait (Suspend^ 
for I/O 



Number of 

Arguments, 

Name(s) 



3, MIP#, 
LOADR, 
EPA 

3, MIP#, 
LOADR, 
EPA 

5, CMDSTR, 
KEY, CTRL, 
PAKSTR, 
RESLAB 

1, PRE 



Description 



9) TFLAG 



10) ARG1 
ARG2 
ARGN 



- Argument flag word - i.e., if 
any arguments are supplied, each 
bit of this word corresponds to an 
argument and specifies whether 

(= 1) or not (= 0) to move the first 
word of the argument list to the 
TCB. 

- Argument 1 address 

- Argument 2 address 

- Argument N address 



Load MIP# (Memory Image Phase Number), at 
LOADR (a specified load address) and return 
the address to give control at EPA (Entry 
Point Address). 

Same as SVC# 37 (LOAD) but perform the 
necessary relocation. 

A free format input record - Descriptor array 
for output string - Controls SVC41 processing 
Packed output string - Reserved labels for 
command operator 

Suspend execution of this user program until 
the I/O (specified by the PRB) completes. 
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Table 5-2. DX980 Supervisor Call Description (Continued) 




Base Ten 
SVC Number 


Function 


Number of 

Arguments, 

Name(s) 


Description 


49 


Allocate Resource 


2, JERR, 


Allocate Resource at runtime. 






JLDT 


JERR - Error /Availability Code returned to 
caller. 

means allocation made 
-5 means device offline 
-4 means device already assigned (un- 
available) 

-3 means device already committed 
(unavailable) 

> an error encountered during assign- 
ment. 

JLDT - A user supplied "assign-time" LDT 
from which the "run- time" LDT is 
built. 


51 


De- allocate 


2, JERR, 


De- allocate resource at run-time. 




Resource 


JLUNO 


JERR - error code returned to caller. 
JLUNO - LUN number under users job of the 
resource to be de-allocated. 


98 


Get Program 


1, ARRAY 


Get program limits of Job partition and return 




limits 




values in the user supplied array. 


129 


Start Job 


1, JSB 


Starts an "independent" job from the user job. 
JSB (JOB START BLOCK) - a user supplied 
block, for starting a job. Includes any re- 
quired JLDT's. 
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5.2 INPUT/OUTPUT - SVC NUMBER 

(p^LDM =ARGLST Set M-Register to List Address 

SVC Execute Call 

ARGLST DATA 1 1 Argument 

DATA PRB Physical Record Block 

This I/O call requests the operating system to perform input/output or file 
management action. Sections III and IV of this manual explain the system 
services available in response to this call. 

5.3 TERMINATE JOB - SVC NUMBER 1 

@LDM =ARGLST Set M-Register to List Address 

SVC 1 Execute Call 



ARGLST DATA No Arguments 

This SVC terminates the job issuing the SVC. The Job Management system 
performs job termination, closes any files left open by the user, releases 
the files, devices and memory used by the job step, and prints a job step 
termination message on the system console. If the calling job step is the 
last or only step within a job, a job string termination message is also 
printed. 

SVC 1 is the standard terminating method for jobs that have reached a nor- 
mal conclusion. Although programs normally close all files and devices 
before termination, the operating system can also perform this function. 
Any incomplete input/output operation may be prematurely terminated. 

5.4 SET FLOATING POINT ADDRESS - SVC NUMBER 2 

@LDM =ARGLST Set M-Register to List Address 

SVC 2 Execute Call 



ARGLST DATA 1 1 Argument 

DATA FLT980 Package Entry Address 

This call supplies the operating system with the address of the floating point 
package within the user's program. The Set Floating Point Address call 
(SVC 2) must be issued before performing any floating point operation. The 
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Floating Point Package in the FORTRAN Subroutine Library must have been 
previously combined with the user program by the link editor. The argu- 
ment is the entry point address of the package. 

5. 5 GET MEMORY LIMITS - SVC NUMBER 3 



^LDM =ARGLST 
SVC 3 



Set M-Register to List Address 
Execute Call 



ARGLST DATA 1 

DATA LIMITS 



1 Argument 

Limits Depository Address 



LIMITS BSS 



Lower and Upper 



SVC 3 returns the memory limits of a user job area in the LIMITS argument 
of the SVC. Memory limits correspond to the lower and upper limit regis- 
ters that surround a user's addressable memory area. LIMITS is a two ele- 
ment vector that contains the lower limit in LIMITS (0) and the upper limit 
in LIMITS (1) when control returns to the user program. During program 
execution, this SVC can determine the job area size (<jarea>) that was spec- 
ified when the job was submitted. Since job area size varies with each job 
submission, this information tells a program the amount of memory supplied 
for a given submission. The lower limit is invariably returned as the value 
zero for protected programs. When using SVC 3, the following formula 
yields available memory for workspace: 

Workspace = Supplied Memory Size - Program Residence Requirements 



Upper Limit minus 
Lower Limit 



Last Program Address minus 
First Program Address 



SVC 98 performs a similar function and is simpler to use in certain cases. 
5.6 TERMINATE JOB ABNORMALLY - SVC NUMBER 4 



@LDM =ARGLST 
SVC 4 



Set M-Register to List Address 
Execute Call 



ARGLST DATA 1 or 2 

DATA ERRCOD 
DATA ERRID 



2 if Optional Argument Used 
Address of Binary Error Code 
Optional, Address of 6-character ID 



ERRCOD DATA value 
ERRID DATA 'ABCDEF' 



System Console Prints Value + 1000 
System Console Prints ABCDEF 
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The operating system terminates a job abnormally because of a fatal program 
error. Similarly, the program can terminate itself abnormally because of 
an abortive error made by the user. Since the termination message and 
error code are displayed on the system console, a user can notify the con- 
sole operator of an abortive condition without assigning the system console 
to his program. To avoid confusion between user generated and system gen- 
erated termination codes, the system adds 10, 000, « to ERRCOD before 
printing. ERRCOD is a 16-bit number. 



5. 7 TERMINATE TASK - SVC NUMBER 5 



(SLDM =ARGLST 
SVC 5 



Set M-Register to List Address 
Execute Call 



ARGLST DATA 



No Arguments 



SVC 5 invokes normal task termination. If the subject task is the last or 
only task for a job, the job also terminates normally. 

5. 8 DELETE TASK(S) - SVC NUMBER 6 

@LDM =ARGLST Set M-Register to List Address 

SVC 6 Execute Call 



ARGLST DATA 1 

DATA TASKID 



1 Argument 

Address of Task Number 



TASKID DATA value 



16-bit Value for TASKID 



This call deletes all tasks within the job whose identifying number corre- 
sponds to that given in TASKID. TASKID is a 16 -bit binary number that 
must correspond to the TASKID supplied when the subject task(s) was created. 
SVC 6 can delete more than one task at a time if they have the same task 
identification (TASKID). If several tasks are created to perform a similar 
function, the user can thereby cancel them all at once. This SVC is used by 
one task to delete another. Thus, a supervisory routine can maintain control 
by creating and deleting tasks as dictated by the environment. 
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5.9 SUSPEND TASK (WAIT FOR EVENT) - SVC NUMBER 7 

@LDM = ARGLST Set M-Register to List Address 
SVC 7 Execute Call 



±J£%, J,£% 



DATA WCL 



i\Uijiucr Oi -o-rguxneni-s 

Address of Wait Criteria List (WCL) 



DATA RETEDB Address of a structure containing the 

returned event descriptor block (EDB^ 

optional 



WCL DATA value 

DATA value 



A List of Events 
Descriptors 



RETEDB DATA $-$ 



DATA $-$ 



This field will contain upon activation 
the EDB on which the last matched 
occurred. It must be the size of the 
largest EDB identified in the WCL. 



SVC 7 suspends the calling task until the occurence of the selected combina- 
tion of events as described in the Wait Criteria List (WCL). The Suspend 
Task (SVC 7) and Post Event (SVC 8) calls are extremely useful in multitask 
environments. Together these two SVCs coordinate the activities of several 
tasks that are running asynchronously. The calls cooperate within a single 
job or between separate jobs. The suspend task SVC can also be used inde- 
pendently to wait for specified system events, such as time of day. A task 
may be suspended to wait for a single event or for several events to occur. 
Upon reactivation a user may determine on which EDB the last match oc- 
curred. 



Change 1 
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The returned event descriptor block argument is optional and, if specified, 
this argument is a pointer to a structure large enough to contain the largest 
EDB specified in the WCL. Upon reactivation of the task, this structure will 
contain the EDB on which the last match occurred. 

5. 9. 1 WAIT CRITERIA LIST (WCL) 

The Wai,t Criteria List is the only required argument for the Suspend Task 
SVC. A WCL contains one or more Event Descriptor Blocks (EDB) that de- 
fine the parameters that must be satisfied before the task can resume execu- 
tion. Figure 5-1 illustrates the components of an EDB. The Event Index 
(Word 1) is a numerical value that identifies the event to the operating system. 
These index values are given in the descriptions of system-wide and job- 
oriented event types later in this section. The index may require 0, 1 or 2 
I. D. words within the EDB. The number and meaning of the I. D e words is 
different for each index. 

A WCL containing only one EDB requires no further information. If the WCL 
contains more than one EDB, the EDBs must be preceded in the WCL by two 
words that prescribe: 

1. The two's complement of the number of EDBs in the WCL 

2. How many of the events must be satisfied before the task is activated. 
Figure 5-2 illustrates a WCL containing multiple EDBs. 

5.9.2 SYSTEM-WIDE EVENTS 

A system-wide event is an event that is beyond the scope of a single job. 
When tasks are suspended to wait for a system-wide event, the operating 
system places the associated EDB' s in the job extension area, and links 
them together in separate lists for each event index. Each event index list 
may contain EDBs from several concurrent jobs. All system-wide events 
can be specified in an SVC 7 call as an event to reactivate a task. Some 
system- wide events can be specified in an SVC 8 call, while others can be 
posted only by the operating system. Those system- wide events that allow 
an SVC 8 call (user posting) provide the capability for synchronizing tasks 



WORD 1 



WORD 2 



WORD 3 



EVENT INDEX 



EVENT I .D. WORD 1 



EVENT I .D. WORD 2 



(A)129480 



Figure 5-1. Event Descriptor Block Organization 
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WORD 1 
WORD 2 

WORDS 3-5 
WORDS 6-8 



WORDS N-N+2 
(A)1 29381 



two's complement 


OF 


NUMBER OF 


EVENTS 


IN 


WCL 


NUMBER 


OF 


EVENTS 


TO 


ACTIVATE 


TASK 






EDB 1 


EDB 2 




EDB n 



Figure 5-2. WCL With Multiple EDB 

across job boundaries. Table 5-3 lists the system-wide events and their 
attributes. The following paragraphs define the column headings of that 
table. 

5. 9. 2. 1 USER WAITABLE. This column indicates whether the event can 
be the object of an SVC 7 call (user wait) from a user program. 

5.9.2.2 USER POSTABLE. This column indicates whether the event can 
be posted by the user with an SVC 8 call. User postable system-wide events 
are not remembered for matching with subsequent SVC 7 calls. Therefore 
the SVC 7 suspend must precede the SVC 8 post. 

5. 9. 2. 3 SINGLE OR MULTIPLE MATCH. When an event is posted, the 
operating system scans all the EDBs linked with the posted event index to 
determine if the posted event releases any of the waiting tasks. Similarly 

|uui uuu.y iui sdvauic juu-uiiciHcu events;, wnen a. idSA j.b suspcuueu, ui±c 

operating system examines previous postings to determine if the event spec- 
ified in the Suspend Task call has already happened. User postable system- 
wide events are not remembered beyond a single scan. Therefore, a Suspend 
Task call awaiting a previously user-posted system-wide event must wait for 
the next posting to be released. The single or multiple match column spec- 
ifies how far the operating system will search following the posting of an 
event. If the table indicates a single match, then the operating system scans 
waiting EDBs until it finds only one task to release. If the table indicates a 
multiple match, the operating system scans all waiting EDBs in the list and 
releases all tasks that are waiting for that event. When multiple tasks are 
released, processing will proceed in priority order. Tasks are released if 
the event I.D. words of both the SVC 7 and SVC 8 match as specified by the 
Relational Operator. 
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Table 5-3. User Accessible System-Wide Events 



Index 


User 


User 


Single or 

Multiple 

Match 


Relational 


Number 


Event 


Number 


Waitable 


Po stable 


Operator 


I.D. Words 


Description 


22 


Yes 


No 


Multiple 


> 


2 


Time-of-day (double 
prec. word in milli- 
seconds) 


23 


Yes 


No 


Multiple 


> 


2 


Delta time (double 
prec. word in milli- 
seconds; 100 ms min) 


24 


Yes 


No 


Multiple 


= 





Any job step termi- 
nation 


25 


Yes 


No 


Multiple 




1 


Particular job string 
termination (bits 0- 
11 = job string no. ) 


29 


Yes 


No 


I Multiple 


= <D 




© 


35 


Yes 


Yes 


Single 


= 




Open to user 


36 


Yes 


Yes 


Single 


= 




Open to user 


37 


Yes 


Yes 


Multiple 


= 




Open to user 


38 


Yes 


Yes 


Multiple 


= 




Open to user 


39 


Yes 


Yes 


Multiple 


= 




Open to user 



NOTES: 
CD 







If Bits 0-7 of the event I.D. are not all one's, then the com- 
pare relation operator " = " is done on all of the event I.D. ; 
otherwise, it is only done on Bits 8-15 of the event I.D. 

The event I. D. is a 16-bit composite of an internal de- 
vice I.D. and a control character, as follows: 



7 


8 15 


DEVICE I.D. 


CONTROL CHARACTER 



The internal device I. D. is an 8-bit field, that identifies 
the data terminal where the control character is gener- 
ated. This field is set to a >FF if the match is to be 
made on any data terminal generating the control char- 
acter. The control character is a 7-bit pattern gener- 
ated on the data terminal. Refer to the table of USASCII 
Control Characters in Section III to determine which 
control characters. are postable. 



5. 9.2.4 RELATIONAL OPERATOR. This column lists the criteria for 
determining if the I.D. words of a posted event match the I.D. words of 
a waiting task. The task is released if the I.D. words are equal (=), or 
if the I.D. words of the posted event are greater than or equal to (>) the 
waiting task's I.D. words. 
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5.9.2.5 NUMBER I. D. WORDS. This column lists the number of I. D 
words that must be included in the EDB of an SVC 7 call that specifies the 
assocaited event index number. 

5.9.3 JOB ORIENTED EVENTS 

Job oriented events synchronize tasks within a single job. All job oriented 
events are User Postable and have a Relational Operator of " = ". A job ori- 
ented event may be posted by a task even though no other task is currently 
waiting for that event. If the event is specified as savable, the post is pre- 
served until a corresponding wait is issued, or until the job terminates. 
Once saved, the post is not retained past the first match. Table 5-4 lists 
the job oriented events and their attributes. Each job defines the functions 
of the events that it uses. 



Table 5-4. Job- 


-Oriented Events 


Index 
Number 


Savable 


Single or 

Multiple 

Match 


Number 
I.D. Words 


40 


Yes 


Single 




A 1 

"I J. 


J. V* 






42 


Yes 


Single 


2 


43 


No 


Single 




44 


No 


Single 




45 


No 


Single 


2 


46 


No 


Multiple 




47 


No 


Multiple 




48 


No 


Multiple 


2 


49 


No 


Multiple 


1 



5. 10 POST AN EVENT - SVC NUMBER 8 



@LDM = ARGLST 
SVC 8 



Set M-Register to List Address 
Execute Call 



ARGLST DATA 1 

DATA EDB 



1 Argument Address 

Address of Event Descriptor Block 



EDB DATA Event index Event Descriptor Block 

DATA I.D. Word 1 
DATA I.D. Word 2 
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The Post Event SVC notifies the system that the specified event has occurred. 
The system then performs the necessary processing to either activate waiting 
tasks or queue the event posting. Queueing occurs only for savable job- 
oriented events that have no tasks waiting for them at the time of the posting 
call. System-wide events are posted according to the attributes defined for 
the corresponding event index. These postings may affect tasks throughout 
the system. Job oriented events are posted according to the corresponding 
job oriented event index. These postings can only affect tasks within the 
same job. 

The Post Event SVC contains only one argument: an Event Descriptor Block 
(EDB). The format of the EDB for SVC 8 is the same as that for SVC 7. 



5. 11 GET TIME AND DATE - SVC NUMBER 29 



@LDM 


sARGLST 


SVC 

• 


29 


• 

ARGLST DATA 


4 


DATA 


BTIM 


DATA 


BDAT 


DATA 


CTIM 



DATA CDAT 



Set M-Register to List Address 
Execute Call 

4 Arguments 

Address for Binary Time (Milliseconds) 

Address for Binary Date (Year, Day) 

Address for Character Time (Hours, 
Minutes, Seconds) 

Address for Character Date (Month, 
Day, Year) 



BTIM 


BSS 


2 


BDAT 


BSS 


2 


CTIM 


BSS 


3 


CDAT 


BSS 


3 



Binary Milliseconds Since Midnight 

Binary Year, Binary Day in Year 

HHMMSS in USASCII 

MMDDYY in USASCII 

This call gets the current time and date from the system. The operator 
supplies the system with time and date at IPL time and may change it from 
the operator' s console while DX980 is running. An interval timer main- 
tains the time for the system. There are 86,400,000 milliseconds in a day. 
The double length time word accomodates 1,073,741, 823 milliseconds. 
Therefore, the timer does not overflow during a day. The interval timer 
for most installations interrupts each 100 milliseconds so that BTIM is 
truncated to the nearest 100 milliseconds. 
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5. 12 CREATE TASK - SVC NUMBER 30 



@LDM =ARGLST 
SVC 30 



Set M-Register to List Address 
Execute Call 



ARGLST DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 



n Number of Arguments 

TPRI Address of Task Relative Priority 

TID Address of Task Identifier 

TSTART Address of Task Entry Point 

TREG Address of Starting Register Values 

TSS Address of Task System Stack Size 

TWCL Address of Task Wait Criteria List 



DATA TSTK Address of User Stack Address 

DATA TWRKA Address of Flag for Work Area 

DATA TFLAG Address of Argument Flags 

DATA ARG1 User Argument Address 1 

DATA ARG2 User Argument Address 2 



optional 



TPRI DATA 
TID DATA 

REF TSTART 

TREG DATA 



TSS DATA 

TWCL DATA 

TSTK DATA AREA 

AREA BSS size 

TWRKA DATA 0> 



Priority Relative to Job 
Arbitrary 16-Bit Task I. D. 
Task Entry Point 

-^Undefined Register Values, Otherwise, 
Points to Starting Values for A,E,X,M, 

S, L and B. 
System Stack Size, for New Task 

Zero, or Wait Criteria List if the Task 

begins Suspended While Awaiting for 

a Posted Event (See SVC 7). 
Address of Stack Area 
Stack Area for Building Call Arguments 

for Task 
If Not Zero, a flag indicating User Work 

Area in AREA 



TFLAG DATA 



Bits that Equal 1 to Indicate Arguments 
Transcribed into AREA 



Once a job is running with the single task created by the system, additional 
tasks can be created from the user program with the SVC 30 call. The 
created tasks can have an equal or lower priority (high numerically) than 
the job under which the task runs. The priority for a new Task, TPRI, is 
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stated relative to the basic job step priority specified in JCL (<jsprty>). 
TID supplies an identifier for the new task. The identifier may be refer- 
enced in a subsequent SVC 6. The starting address for program execution 
within the task is supplied as TSTART. TREG is a pointer to a set of values 
for the register file. If the pointer is to a -1, the register file values for 
the new task are undefined. If the location does not contain -1, the param- 
eter points to values to be passed to the new task in A, E, X, M, S, L, and 
B registers. The new task requires allocation in the job extension area mem- 
ory for system temporary storage (see Section II, < stksize>). TSS specifies 
this allocation. The argument TWCL, if zero, indicates that the new task is 
to be created active. If the first word of TWCL is not zero, then it and sub- 
sequent memory words constitute a wait criteria list as defined under SVC 7 
and the task is created in a suspended state. The wait criteria list defines 
the event (s) that activate the new task. 

5. 12. 1 OPTIONAL ARGUMENTS 

The call arguments TSTK, TWRKA, TFLAG, and ARGi are optional. If none 
of these are furnished, the new task receives a value defined by TREG in 
the M-Register. If these arguments are supplied, the M-Register points to 
AREA as specified by TSTK in the call. The operating system establishes 
the first word of AREA to specify the number of address arguments to be 
placed in AREA. Any address arguments that the operating system tran- 
scribes into AREA before activating the task appear in the following order: 

1. The address of work space within AREA 

2. ARG1 

3. ARG2 



Each bit in the TFLAG argument corresponds to one of the supplied argument 
addresses; bit represents the first address, bit 1 represents the second ad- 
dress, etc. , to a maximum of 16 addresses. If the bit is a zero, the oper- 
ating system transcribes the argument address (ARGi) into AREA. If the bit 
is a one, the operating system transcribes the argument value into AREA 
immediately following the argument addresses, and alters the corresponding 
argument address in AREA to point to the location in AREA containing the 
argument value. Figure 5-3 illustrates possible contents of AREA when the 
task is activated. 



5. 12. 2 CREATE TASK EXAMPLES 

The following paragraphs illustrate some uses of the Create Task SVC. 
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NO ADDRESSES GIVEN 
IN CALL 



M-REGISTER 
POINTS TO 



AREA 



OR 



M-REGISTER 
POINTS TO 



AREA 



M-REGISTER 
POINTS TO 



OR 



M-REGISTER 
POINTS TO 



BOTH SCRATCH WORK 

AREA AND USER 

ARGUMENTS 



AREA 



n+i 



TWRKA 



H/VRKA 



USER ARGUMENTS 
SUPPLIED 



USER ARG1 
ADDRESS 

USER ARG2 
ADDRESS 



USER ARGD 
ADDRESS 



NUMBER OF ARGUMENTS IN AREA 



USER ARG1 
ADDRESS 

USER ARG2 
ADDRESS 



USER ARGM 
ADDRESS 



SCRATCH 
WORK AREA 



NUMBER OF ARGUMENTS +1 



ADDRESS OF WORK AREA 



USER ARGUMENT ADDRESSES 




USER ARGUMENT ADDRESSES 



TFLAG=4000i6 
(.TRANSCRIBE ARGUMENT 2) 
I 



M-REGISTER 
POINTS TO 



AREA 



NO USER ARGUMENTS , 

BUT SCRATCH WORK 

AREA SUPPLIED 



AREA 



TWRKA 



TWRKA 



SCRATCH 
WORK AREA 



ADDRESS OF WORK AREA 



TWRKA 



USER ARG1 
ADDRESS 



NEW 2 



USER ARG3 
ADDRESS 



NEW2 



TWRKA 



NEW COPY OF 
USER ARG2 



ADDRESS OF WORK AREA 



NEW ADDRESS FOR ARG2 



SCRATCH 
WORK AREA 



(Aj1 29482 



Figure* 5-3. Sample TSTK Contents 
At Task Activation 
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5. 12.2. 1 NO ARGUMENTS. The following sample call creates a task that 
activates a non-reentrant subroutine, NEWTSK, with no arguments. 
NEWSTK performs non-file I/O, thus requiring a TCB stack of 110 words. 

@LDM = LIST Set List Address 

SVC 30 Create Task 

BRU NEXT Computation continues - 



LIS' 



DATA 


u 


DATA 


ZERO 


DATA 


TASKID 


DATA 


NEWTSK 


DATA 


MINUS 1 


DATA 


TCBSTK 


DATA 


ZERO 



Six Arguments in List 

New Task Priority Same as Job Priority- 
Numeric Task Identifier 
Pointer to NEWTSK 
No Register Arguments 
TCB Stack of 110 Words 
Create Active Task 



ZERO DATA 
TASKID DATA 
MINUS 1 DATA 
TCBSTK DATA 
REF 




1 

-1 
110 

NEWTSK 



Constants, Arguments, etc. 



5. 12.2.2 DORMANT TASK. The following example creates a dormant task 
that activates in 10 seconds and then activates a non-reentrant subroutine, 
NEWTSK, with no arguments. NEWTSK performs non-file I/O, thus requir- 
ing a TCB stack of 110 words. 



@LDM =LIST 
SVC 30 

BRU NEXT 



Set List Address 
Create Task 
Computation Continues 



LIST 



DATA 


6 


DATA 


ONE 


DATA 


TASKID 


DATA 


NEWTSK 


DATA 


MINUS 1 


DATA 


TCBSTK 


DATA 


WCL 



Six Arguments in List 

New Task Priority One Lower Than 

Job Priority 
Numeric Task Identifier 
Pointer to NEWTSK 
No Register Arguments 
TCBSTK of 110 Words 
Pointer to Wait Criteria List 



(listing continued on next text page) 



5-21 



Digital Systems Division 




943005-9701 



(listing continued from preceding text page) 

Constants, Arguments, etc, 



ONE 


DATA 


1 


TASKID 


DATA 





MINUS 1 


DATA 


-1 


TCBSTK 


DATA 


110 


WCL 


DATA 


23 




DATA 







DATA 


10000 




REF 


NEWTSK 



5. 12. 2. 3 ARGUMENTS IN A AND X. The following example creates a task 
that activates a non- reentrant subroutine, NEWTSK, with one argument in 
the A register and one argument in the X register. NEWTSK performs non- 
file I/O, thus requiring a TCB stack of 110 words. 



@LDM 

SVC 

BRU 



= LIST 

30 

NEXT 



Set List Address 
Create Task 
Computation Continues 



LIST DATA 6 Six Arguments in List 

DATA ZERO New Task Priority Same as Job Priority 

DATA TASKID Numeric Task Identifier 

DATA NEWTSK Pointer to Newtsk 

DATA TREG Pointer to Register File 

DATA TCBSTK TCB Stack of 110 Words 

DATA ZERO Create Active Task 



TREG 
ZERO 
TASKID 
RFILE 



TCBSTK 



DATA 

DATA 

DATA 

DATA 

BSS 

DATA 

BSS 

BSS 

DATA 

REF 

BSS 



RFILE 



1 

I 

1 

10 

1 

3 

110 

NEWTSK 

100 



Constants, Arguments, etc. 



A Register - Address of I 
E Register - Dummy 
X Register - Index of 10 
M Register - Not Specifiable 
S, L, B - Dummy 



Data Array 
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5. 12. 2.4 TWO ARGUMENTS. The following example creates a task that 
activates a non-reentrant subroutine, NEWTSK, with two arguments, ARGi 
and ARG2. NEWTSK performs non-file I/O thus requiring a TCB stack of 
110 words. 

Set List Address 
Create Task 
Computation Continues 

LIST DATA 11 Eleven Arguments in List 

New Task Priority Same as Job Priority 

TASKID of One 

Pointer to NEWTSK 

No Register Arguments 

TCB Stack of 110 Words 

Create Active Task 

Stack for Argument List 

No Work Space 

No Volatile Arguments 

Pointer to First Argument 

Pointer to Second Argument 



LDM 


= LIST 


SVC 


30 


BRU 

• 


NEXT 


DATA 


11 


DATA 


ZERO 


DATA 


TASKID 


DATA 


NEWTSK 


DATA 


MINUS 1 


DATA 


TCBSTK 


DATA 


ZERO 


DATA 


STKPTR 


DATA 


ZERO 


DATA 


ZERO 


DATA 


ARGI 


DATA 


ARG2 



Constants , Arguments, etc. 



ZERO 


DATA 





TASKID 


DATA 


1 


MINUS 1 


DATA 


-1 


TCBSTK 


DATA 


110 


STKPTR 


DATA 


$+1 




T3 CC 


■7 


ARGI 


DATA 


X,Y,Z 


ARG2 


DATA 


I, J 




REG 


NEWTSK 



5. 12. 2. 4 TWO ARGUMENTS AND WORKSPACE. The following example 
creates a task that activates a reentrant subroutine, RSUB, with two argu- 
ments, ARGI and ARG2. RSUB performs file I/O, thus requiring 300 words 
of TCB stack. In addition, RSUB requires 10 words of remote data area for 
workspace. 



@LDM =LIST 
SVC 30 

BRU NEXT 



Set List Address 
v^reate J. asic 
Computation Continues 



(listing continued on next text page) 
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(listing 


continued 


^IST DATA 


11 


DATA 


ZERO 


DATA 


TASKID 


DATA 


RSUB 


DATA 


MINUS 1 


DATA 


TCBSTK 


DATA 


ZERO 


DATA 


STKPTR 


DATA 


MINUS 1 


DATA 


ZERO 


DATA 


ARG1 


DATA 


ARG2 



from preceding text page) 

Eleven Arguments in List 

New Task Priority Same as Job Priority 

TASKID of Two 

Pointer to RSUB 

No Register Arguments 

TCB Stack of 300 Words 

Create Active Task 

Stack for Argument List and Work Area 

Nonzero Signifies Work Area Supplied 

No Volatile Arguments 

Pointer to First Argument 

Pointer to Second Argument 



Constants, Arguments, etc, 



ZERO 


DATA 





TASKID 


DATA 


2 


MINUS 1 


DATA 


-1 


TCBSTK 


DATA 


300 


STKPTR 


DATA 


$+1 




BSS 


14 


ARG1 


DATA 


X,Y,Z 


ARG2 


DATA 


I, J 




REF 


RSUB 



5. 13 LOAD MEMORY IMAGE PHASE - SVC NUMBER 37 

NOTE 

SVC 37 is not normally used directly by a user pro- 
gram. Normally the overlay manager calls SVC 37 
for the user as described in Section VIII for DXOLE. 

@LDM =ARGLST Set M-Register to List Address 
SVC 37 Execute Call 



ARGLST DATA 
DATA 
DATA 
DATA 



3 3 Arguments 

MIPNUM Address of Memory Image Phase Number 

LOADR Address at Which to Load 

EPA Entry Point Address 



MIPNUM DATA n 

MODULE BSS. k 

LOADR DATA MODULE 

EPA BSS 1 



Memory Image Phase Number per DXOLE 

Load Map 
Overlay Area 

Start Address for Execution 
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SVC 37 loads memory image phases directly from the load module file as- 
signed to the running job. A memory image phase is a separate program 
segment that was produced by the DX980 Linkage Editor (DXOLE). DXOLE 
assigns a number to each memory image phase and outputs that number as 
part of the DXOLE load map. Refer to the DXOLE description in Section VIII 
of this manual for further details on load modules and memory image phases. 
The SVC 37 call applies to preplanned overlays. This means that the link 
editor must establish the load address relative to the main program (root). 
The overlay may only be loaded at that one relative address. On return 
from SVC 37 EPA contains the entry point address of the loaded phase. 



5. 14 LOAD AND RELOCATE MEMORY IMAGE PHASE - SVC NUMBER 38 



@LDM =ARGLST 
SVC 38 



Set M-Register to List Address 
Execute Call 



A.RGLST DATA 3 

DATA MIPNUM 

DATA LOADR 

DA.TA EPA. 



3 Arguments 

Address of Memory Image Phase Num- 
ber 
Address at Which to Load 
Entry Point Address 



MIPNUM DATA n 

MODULE BSS k 

LOADR DATA MODULE 

EPA BSS 1< 



Memory Image Phase per DXOLE Load 

Map 
Overlay Area 

Start A-ddress for Execution 



SVC 38 transfers memory image phases to memory and relocates them witn- 
in memory. The relocation map for the memory image phases is brought in- 
to the job extension area at the same time that a memory image phase is 
brought into the job area. The relocation map must, therefore, be consi- 
dered when determining the size of the job extension area. The size of the 
relocation map can be determined by dividing the number of words in the 
memory image phase by sixteen (one map bit per phase word). This call ap- 
plies to overlays that are not preplanned. Therefore, the link editor did not 
assign a fixed address to the overlay relative to the main program (root). 
The LOADR cell holds the load address of the module. This address may be 
determined dynamically. On return from SVC 38 EPA contains the entry 
point address of the loaded phase. 
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5.15 COMMAND SCANNER MODULE - SVC NUMBER 41 

CLDM = ARGLST Set M-Register to List Address 
SVC 41 Execute Call 



ARGLST DATA 
DATA 
DATA 
DATA 
DATA 
DATA 



n number of arguments 

CMDSTR command string 

KEY key word area 

CTRL control information 

PAKSTR packed string 

RESLAB reserved labels 



DATA MAXCH number of characters to scan 



optional ' 



The Command Scanner SVC is a DX980 nucleus module that can be accessed 
through SVC 41. SVC 41 accepts free format command records and pro- 
duces fixed format arrays. Table 5-5 describes the language syntax accepted 
by the command scanner. 

5.15.1 EXTERNAL INTERFACE 

The linking to SVC 41 is identical to the linkage for other SVC's. The M reg- 
ister points to an argument list. The first word of the list contains the num- 
ber of arguments. Subsequent words contain the argument addresses. 

5.15.1.1 INPUT. All arguments, except PAKSTR, must be initialized by 
the calling routine before issuing the SVC. The following parameters are 
necessary as input: 

CMDSTR . The command string may be a variable length input record. 
If the MAXCH argument is specified, then the size of the command is 
specified via this argument; otherwise, the command string is assumed 
to be an 80 character input record, in which case if the actual string 
is less than 80 characters long, it should end with a period or semi- 
colon, or have the remaining characters filled with blanks. 

KEY . KEY is an array that holds the descriptors for the command plus 
all arguments in CMDSTR. The calling routine must zero the first word 
of the KEY array before invoking the SVC. If the Command Scanner 
later requests continuation records for a command, the first word con- 
tains a non-zero value. This value should not be changed until the calling 
routine wants to start a new command. 
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Table 5-5. Description of Command Language (Backus-Naur Format) 

<command>::=< command string >. 

<command string>;:= <command identifier>| 

<command identifier> <delimiter> <operand string> 

<command identifier> ::=<label>| <blanks> <label> 

<operand string> ::= <operand> 

l<operand string> <delimiter> <operand> 

<delimiter> ::=,]$ % <delimiter> 1 <delimiter> tf|; 

<blanks> ::=tf<blanks> j # | (no characters) 

A command can extend over several input records. The first 
characters on the record will be ignored if CTRL word 5 is 
appropriately set. If a command extends to the next record, 
then the rightmost delimiter on the current record should be 
a semi-colon. If neither a period nor a semi-colon is pres- 
ent at the end of a record, then a period is assumed. Com- 
ments may appear between the period or semi-colon and the 
end of the record. The command identifier is compared 
against the labels in the Reserved Labels table. If the com- 
mand identifier is found in the table, the identifier is treated 
as a Reserved Label; otherwise, the command identifier is 
treated as a label. Only the leftmost eight characters of the 
command identifier are significant. 

<operand> ::= <label>l <number> I <expressions> | <range> 

1 <empty operand> 

I <string> |<assignment> 
<label>::= <letter> | <label> <letter> | <labelxdecimal digit> 

<ietter> ::= a|b| c|d|e|fIg|hIiIjIkIlImIn|oIp|qIrIsIt|uIvIw|x|y|z 

The length of labels is not restricted. 
<number> ::= <signxdecimal integer>/< decimal integer>|<hex integer > 
<decimal integer> ::= <decimal digit> | <decimal integer> <decimal digit> 
<decimaldigit>::= 0|ll2l3|4|5|6|7l8|9 
<sign> ::=+l - 
<hex integer> ::=><hex digit>j<hex integer> <hex digit> 
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Table 5-5. Description of Command Language 
(Backus-Naur Format) (Continued) 

<hex digit>::=0|ll2l3Ul5!6l7l8l9lA|B|clD|E|F 

Decimal integers must be in the range of -32768 to 32767. 
Hex integers must not contain more than four hex digits. 
Numbers larger than four hex digits must be described by- 
strings. 

<expressions> ::= <label> + <right side> 

I <label> (<subscripts> )= <right side> 

<right side> ::= <number> | <label> I <string> 1 (< subscripts> ) l<range> 

<subscripts> ::= <subscripts> , <script> ! <script> 

<script> ::= <number > 1 <Label> 

The number of subscripts allowed is not restricted. 

<empty operand>::= {the empty set} 

An empty operand is generated for every occurrence of 
one of the following conditions: 

• A pair of commas separated by no other characters 
or only by blanks. 

• A comma and a period separated by no other char- 
acters or only by blanks. 

• A comma and a semi -colon separated by no other 
character or only by blanks. 

subscripted expression> :: = <label> (< subscripts> )= aright side> 

<subscripts> ::= <subscripts> , <script>J <script> 

<script>::= <number>) < labels> 

The number of subscripts allowed is not restricted. 
<string> ::= | <substring>j 

<substring> :: = <character>! < substring> <character> 
<character> :: = Any USASCII character. If a "I" is to appear in a 

<substring> , then "II" should appear in the input to the scanner. 

The length of the strings is not restricted. 
<assignment> ::= <label> : = <label> 
<range> ::= <number> :<number> 
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CTRL. CTRL is a six word array, that must be initialized as follows: 

• Word - Number of Characters Reserved for PAKSTR 

• Word 1 - Number of Words Reserved for KEY 

• Word 2 - Not Initialized by the Calling Routine. Used by 

Command Scanner for Workspace 

• Word 3 - Not Initialized by the Calling Routine. Used by 

Command Scanner for Workspace 

• Word 4 - Number of Labels in RESLAB 

• Word 5 - The Column Number in CMDSTR Where Scanning is 

to Start; the First Column in CMDSTR is Column 
Zero. 

MAXCH . MAXCH is a one -word field containing the number of char- 
acters to scan. This argument is optional and if not specified the com- 
mand string size is assumed to be 80 characters. 

5.15.1.2 OUTPUT. SVC 41 changes PAKSTR and KEY, plus two words of 
workspace. The following paragraphs describe the effects on these two ar- 
guments. 

PAKSTR . PAKSTR is used for storage of alphanumeric fields that were 
retrieved from CMDSTR. The fields are packed together under control 
of the KEY array. 

KEY . The first word of KEY contains a completion code. The remain- 
ing words contain a translation of the command string. The value of the 
completion code indicates one of the following conditions: 

• Normal End of Scan - A complete command has been success- 
fully decoded. 

• Continuation Requested - The command extends across more 
than one record. The value of the completion code minus one 
is the number of continuation records previously read. KEY 
array contains descriptors for all fields of CMDSTR that have 
been scanned. 

• Error - Scanning of CMDSTR is terminated. The value of the 
completion code indicates which error has occurred. Table 
5-6 describes the error numbers. The KEY array contains 
descriptors for all fields of CMDSTR that have been scanned. 
However, the last descriptor may be incomplete or erroneous. 
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Table 5-6. Error Codes 



Code 



Explanation 



401 
402 
403 
404 
405 
406 
407 
408 
409 
410 
411 
412 
413 
414 
415 
416 

417 

418 

419 



Overflow of the keyword area. 

Overflow of packed strings character string. 

The right-hand side of an expression or range is missing. 

Unrecognizable or illegal subscript. 

Missing delimiter after command identifier. 

Number is larger than 16 bits. 

Operand starts with illegal character. 

Illegal digit in number. 

Missing delimiter after operand. 

Missing delimiter after subscript. 

Illegal character precedes command. 

ITS Run command does not contain a label or an expression. 

Missing equal sign following colon in assignment. 

The right-hand side of an assignment is missing. 

Too many equal signs in expression. 

Negative number of characters specified for PAKSTR by 
CTRL word 0. 

Non-positive number of words specified for KEY by CTRL 
word 1. 

Non-positive number of labels specified for reserved 
labels list (RESLAB) by CTRL word 4. 

The starting column for the scan, specified by CTRL 

word 5, does not fall into the range of zero to seventy-nine. 



Following the completion code is a description of the translation of CMDSTR, 
The second word of KEY contains the number of operands detected in 
CMDSTR. The remainder of KEY contains descriptors for the operands. 
The format for KEY is illustrated in figure 5-4. The operand descriptors 
are described in figure 5-5. The eight possible descriptor types are: 
Label, Number, Expression, Range, Reserved Label, Empty Operand, 
String, and Assignment. 
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LABEL DESCRIPTOR 



NUMBER OF CHARACTERS 
IN LABEL 



POINTER TO START OF 
LABEL IN PAKSTR 



NUMBER DESCRIPTOR 



VALUE OF NUMBER 



ASSIGNMENT DESCRIPTOR 



NUMBER OF CHARACTERS 
IN LABEL 



Pqintfr tq START OF 
" "LABEL IN PAKSTR 



NUMBER OF CHARACTERS 
IN LABEL 



POINTER TO START OF 
LABEL IN PAKSTR 



RANGE DESCRIPTOR 



VALUE OF 1ST NUMBER 



VALUE OF 2ND NUMBER 



JLEFT SIDE OF 
ASSIGNMENT 



, RIGHT SIDE OF 
'ASSIGNMENT 



EMPTY OPERAND DESCRIPTOR 



SUBSCRIPTED EXPRESSION DESCRIPTOR 



NUMBER OF CHARACTERS 
IN LABEL 



POINTER TO START OF 
LABEL IN PAKSTR 



NUMBER OF SUBSCRIPTS ON 
LEFT SIDE 



DESCRIPTORS FOR LEFT SIDE 

SUBSCRIPTS (NO DESCRIPTORS 

IF NUMBER SUBSCRIPTS = 0) 



NUMBER OF SUBSCRIPTS 
ON RIGHT 



DESCRIPTORS FOR RIGHT SIDE 

SUBSCRIPTS (MUST BE AT 

LEAST ONE) 



DESCRIPTION OF 
LABEL ON LEFT SIDE 



DESCRIPTORS FOR 
> LEFT SIDE SUB- 
SCRIPTS 



DESCRIPTORS FOR 
RIGHT SIDE SUB- 
SCRIPTS 



STRING DESCRIPTOR 



NUMBER OF CHARACTERS 
IN STRING 



POINTER TO START OF 
STRING IN PAKSTR 



RESERVED LABEL DESCRIPTOR 



POINTER INTO RES LAB 



(A)130 126A 



Figure 5-5. Templates for Descriptors in KEY Array- 



Change 1 



5-31 



Digital Systems Division 




943005-9701 



KEY ARRAY IN MEMORY 



WORD 



WORD 1 



WORD 2 



COMPLETION CODE 



NUMBER OF DESCRIPTORS 



WORDn 



DESCRIPTOR FOR 
EACH OPERAND 



(A)1 301 20 

Figure 5-4. Format of Key Array After Return from SVC 41 

5.15.2 SVC 41 EXAMPLE 

The ITS Supervisor uses SVC 41 to decode commands from each terminal, 
The arguments could be declared as follows: 



CMDSTR 

KEY 

CTRL 



PAKSTR 
RESLAB 



BSS 80 
BSS 50 
DATA 80 
DATA 50 
BSS 2 
DATA 12 
DATA 
BSS 80 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 



'LOGON 

•LOGOFF 

'RUN 

•STATS 

'EDIT 

'ENTER 



Terminal command line 

Key array 

Number of characters in PAKSTR 

Number of words in KEY 

Workspace for SVC 41 

Twelve valid commands 

START SCAN at 

Packed string 

Reserved labels 



(Listing continued on next text page) 



Change 1 



5-32 



Digital Systems Division 




943005-9701 



(Listing continued from preceding text page) 

DATA 'JOB 
DATA 'DELETE 
DATA »F1 
DATA 'F2 
DATA 'Al 
DATA 'A2 



If a terminal user enters the following command: 

EDIT FILE=(1,USER01,MVFILE). 

The command is stored in CMDSTR by an ITS I/O routine. The ITS super> 
visor issues SVC 41 with the standard argument linkage for SVC's. After 
control returns from the command scanner, PAKSTR and KEY contain the 
values illustrated in figure 5-6. 



KEY 



(A)130122 

Figure 5-6. 



SCAN COMPLETE 
5 DESCRIPTORS 

• COMMAND 



LETT SIDE OF EXPRESSION 

/ 
NO SUBSCRIPTS ON LEFT" SIDE 

/ 

3 SUBSCRIPTS ON RIGHT SIDE 
FIRST ARGUMENT 



. SECOND ARGUMENT 



' THIRD ARGUMENT 





PAKSTR 


9 C. 


F 


I 


1 


2. 


U 


3 


E 


<4 
i 


u 


s 


S 




E 


1 


R 


? 





T 


1 


{*> 


M 


n 


Y 


r-* 


F 


' «**■* 


1 


<j 


L 


£ 


E 



Resulting Contents of KEY and PAKSTR 



Change 1 



5-33 



Digital Systems Division 




943005-9701 



5.16 WAIT FOR I/O - SVC NUMBER 43 

@LDM =ARGLST Set M-Register to List Address 
SVC 43 Execute Call 

• 

ARGLST DATA 1 1 Argument 

DATA PRB Address of PRB Used for Initiate Call 

The Wait for I/O SVC is used in conjunction with an Initiate I/O data transfer 
(see Section III) or with a multitasking program that requires synchronization 
of I/O and processing tasks. For Initiate I/O calls the calling program con- 
tinues execution during the actual I/O transfer. If processing must be dis- 
continued at some point in the program until a requested I/O transfer is com- 
plete, the Wait for I/O SVC is issued. Program execution is then suspended 
until the I/O transfer is complete. If the I/O is already complete, process- 
ing proceeds without suspension. 

The procedure is similar for multitasking programs except that a separate 
task issues an Execute I/O rather than an Initiate I/O call. Other tasks 
issue a Wait for I/O SVC to synchronize the I/O with processing portions of 
their program. 
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5. 17 ALLOCATE RESOURCE - SVC NUMBER 49 

(?LDM =ARGLST Set M-Register to List Address 
SVC 49 Execute Call 



ARGLST DATA 2 

DATA JERR 
DATA JLDT 



2 Arguments 

Address or Return of Error Code 

Address or Resource Assignment Block 



JERR 



JLDT 



BSS 



BSS 



20 



0=Ok, 39 = Device Offline, 88=Device Un- 
available, > 0= Error 
Assignment Block 



The Allocate Resource SVC assigns a logical unit to a device or file from 
within user code at runtime. This feature permits extension of the job as- 
signments that were made with JCL (refer to Section II for a discussion of 
JCL assignments). In response to SVC 49, the operating system checks the 
availability of the requested resource. If the resource is available, the op- 
erating system assigns that resource to the specified user job LUN. If the 
specified LUN matches a previous user LUN, the new assignment super- 
cedes the old assignment. 



When using SVC 49 with a high priority program, 
ensure that lower priority programs have not re- 
served the requested resource. Failure to observe 
this precaution may deadlock the system until the 
lower priority program releases the device. 

Input parameters for SVC 49 are one word for error code return, plus 
another word group for the resource assignment block. The error code re- 
turned in the first parameter is one of the following quantities: 

• = Allocation Made 

• 39 = Device Offline 

• 88 = Device Already Assigned/Committed 

• other (See Appendix A for error codes) 

The resource assignment block (JLDT) describes the file or device to be 
assigned. The length of this block varies. It is four words long for a de- 
vice assignment, 13 words long for an old file assignment, and 20 words 
long to define a new file or replace an old file. Table 5-7 lists the word and 
bit assignments for all fields of the resource assignment. Unused fields 
should contain zeros for compatability with future uses. 
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Table 5-7. Resource Assignment Block (JLDT) Format 



Word 


Bit 


Field Description 







Flag Word 







Not used 




1 


Device(0)/file(l) flag 




2 


Not used 




3 


Fvrl nsi-;7-<=»fn)/sVipT , <=>rH'M ni-r-^ca f 1 a or 




4-5 


Not used(00)2 




6 


No pass(0)/pass(l ) resources flag 






Remainder of bits applicable to file assignments only: 




7 


No delete(0)/delete(l) file flag 




8-9 


Disposition flag: 

002 = Assign old file 
01 2 = Define new file 
102 = Replace old file 
1 1 2 = Illegal disposition 




10-11 


File type flag 

002 = Illegal type 

01 2 = Linked sequential 1 

102= Relative record 

1 1 2 = Key indexed 




12 


Permanent(0)/temporary(l ) file flag 




13-15 


Not used (000) 2 


1 


0-7 


Not used 




8-15 


Logical unit number (LUN) 


2 




Device index (decimal 1-256 corresponding to device re- 
quired). Actual device indexes for the physical devices 
can be obtained through the List Device (LD) command 
during IPL. 


3 




Reserved for future use 






Remainder of words applicable to file assignments only: 


4 




Number of buffers to be used for file I/O 


5-7 




File owner user ID (6 USASCII alphanumeric characters) 


8-10 




File name (6 USASCII alphanumeric characters) 


11-12 




File password (4 USASCII alphanumeric characters) 
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Table 5-7. Resource Assignment Block (JLDT) Format (Continued) 



Word 


Bit 


Field Description 






Remainder of words applicable to file define /replace 






only: 


13 




Integrity code 




0-2 


Read code 

100;? = Creator only 
1102= Password owner 
1112 = Any user 




3-5 


Write code- same options as read code 




6-8 


Delete code- same options as read code 




9-11 


Execute code- same options as read code 




12-15 


Not used 


14 




Initial file size (in tracks) 


15 




First disc address for allocation (in tracks) 


16 




Physical record length (in words) 


17 




Maximum file size (in tracks) 


18 




Logical record length (in characters) for relative rec- 
ord files only 


19 




Key length (in characters) for key indexed files only 



5.18 DEALLOCATE RESOURCE - SVC NUMBER 51 



Set M-Register to List Address 
Execute Call 



2 Arguments 

Address for Return of Error Code 

Address for Logical Unit Number 

0=Ok, >0 = error 

Logical Unit for Released Resource 

The Deallocate Resource SVC removes an assignment of a device or file from 
a user program at runtime. The released resource may have been allocated 
to the job step initially by JCL or may have been allocated during runtime 
with a SVC 49 call. 

The input parameters consist of a word for return of error code from DX980 
(0=Ok, >0=improper LUN), plus a word containing the LUNQ-254) to be 
deallocated. 





@LDM 


=ARGLST 




SVC 

• 


51 


ARGLST 


DATA 


2 




DATA 


JERR 




DATA 


JLUNO 


JERR 


BSS 


1 


JLUNO 


DATA 


n 
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5.19 GET PROGRAM LIMITS - SVC NUMBER 98 



(g>LDM 
SVC 


=ARGLST 
98 


• 

ARGLST DATA 
DATA 

• 


1 

LIMITS 


LIMITS BSS 


2 



Set M-Register to List Address 
Execute call 



1 Argument 

Address for Limits Depository- 



Lower and Upper 

SVC 98 is identical to SVC 3 (Get Memory Limits) except that the memory- 
limits returned in LIMITS correspond to the area between the last word of 
the user program and the end of the job area. This SVC determines the 
amount of memory remaining for work area beyond the actual program code, 
When using this SVC in conjunction with preplanned overlays, LIMIT (0) 
contains the first word beyond the longest overlay; when used with non- 
preplanned overlays, LIMIT (0) contains the first word beyond the root seg- 
ment. 



5-20 USER START JOB - SVC NUMBER 129 

@LDM = ARGLST ' Set M-Register to List Address 

SVC 129 Execute call 



ARGLST DATA 1 

DATA JSB 



1 Argument 

Address for Job Structure Block 



The User Start Job SVC presents independent job steps to the system for exe- 
cution. The input to this SVC consists of a Job Structure Block (JSB). To 
initiate a multisten iob string, the user must issue a separate User Start 
Job SVC for each job step of the string. The JSB for a single job step con- 
sists of a 26 word preamble plus one resource assignment block (JLDT) for 
each resource to be initially assigned to the job step. Refer to the Allocate 
Resource call (SVC 49) for a description of the JLDT. Table 5-8 lists the 
word and bit assignments for the JSB preamble. Jobs may be started from 
the system console or via batch or interactive input through the subsystems. 
All of these methods utilize JCL. Jobs should be initiated in those ways 
rather than through SVC 129. User Start Job should be used only when other 
alternatives are unsatisfactory. If the system detects an error in the struc- 
ture of a job being submitted, it dismisses all previous job steps and aborts 
the job. 
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Table 5-8. Job Structure Block (JSB) Preamble Format 



Word 


Bit 


Field Description 







Total length of JSB (for one job step, including all 
JLDT' s) 


1 




Flagword 







Last job step in sequence of steps within a job 

= No (More SVC 129's are forth coming in this 

job) 
l=Yes (This is the last SVC 129 for this job) 




1 


Privileged mode 

= Unprivileged mode <PROT> 

1 = Privileged mode <PRIV> 




2-15 


Not used 


2-4 




User I. D. -<userid>(6 alphanumerics in US ASCII) 


5-7 




Job name - <jsname> (6 alphanumerics in USASCII) 


8 




Job step number within job string (1 to 15) 


9 




Job priority - <jsprty> (1 to 31) 


10 




Number of task priority levels within the job - < nprty> 
(1 to 31) 


11 




User partition size - <jarea> (load module + user buffer) 


12 




Job size - < jearea> (I/O buffers + job internal system 
control area) 


13 




Stack size of initial task TCB and default size for sub- 
sequent tasks - <stksiz> 


14 




Time limit for job step (in seconds); -1 indicates no 
time limit 


15-16 




Two words, initially zero, for use by DX980 


17 




Load module volume ID - < volume > 


1!) 

20 J 




Load module user I.D. (6 alphanumerics USASCII) - 




<fileid> 


21 \ 

22 > 

23 ) 




Load module file name (6 alphanumerics in USASCII) - 
<filnam> 


24 I 




Load module password (4 alphanumerics in USASCII) - 


25 1 




<pswd> 


26 




JLDT' s 



5-3! 



Digital Systems Division 




943005-9701 



SECTION VI 
BATCH PROCESSING SUBSYSTEMS 



6. I GENERAL 



Three separate subsystems provide batch processing capabilities to the 
DX980 user. These subsystems are Batch Input Reader (BIR), Batch Input 
Spooler ^BIS^ and Batch Output Spooler ^BOS^ # The two in^ut subsystems 
allow submission of user programs through a card reader. These subsys- 
tems accept a data stream of intermixed data and control cards. However, 
the BIS subsystem stores the input information on disc prior to activation of 
the job, whereas the BIR subsystem allows the executing program to read 
directly from the input peripheral device. Similarly, the BOS subsystem 
reads program output from a disc and transfers it to a low speed output de- 
vice such as a line printer. The subsystems may run concurrently as long 
as they each have separate peripheral devices. Normally, the operator 
starts one subsystem and allows it to run continuously. Any of the subsys- 
tems, however, may be stopped at any time. 

The subsystems are structured and invoked in the same manner as a job. 
Each subsystem requires a JCS that identifies the peripheral devices and the 
load module file. The operator activates the subsystem with JCL Job and 

lvun cuixunaiiuo iiuiu uic oj duciu ^uiiouiCi iiic luuuwiiig paiagiapuo u.co»_ x J. uc 

the operation of each subsystem and provide examples of batch processing 
sequences. 

6.2 BATCH INPUT READER (BIR) 

The BIR subsystem functions as a single program input stream. That is, 

i-i _-~ «,~~J„ -, — - :-~J :~ *. J-,4-« j: 4-i._ r . j.t : a. j : 

uxic piugiaixi x cauo a-iiy icquiicu lupuu uaia uncv^uy nuiu uuc jlxijjui ucvitc ( 

Therefore, the batch input device may be unavailable to other users until 
that program terminates. The BIR subsystem does, however, decrease the 
I/O overhead associated with spooling. Figure 6-1 illustrates a typical deck 
structure for BIR input. The following control commands govern BIR pro- 
cessing: 

//JOB JCL Job command 

//RUN JCL Run command 

//DATA BIR Data Control command 

/$ BIR End of Job command 

6.2. 1 JOB COMMAND 

The Job command used with BIR is identical to the JCL Job command and 
defines the start of the job. This command is described in Section II of this 
manual. 
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ENTER VIA CONSOLE 
"JOB BIR SYSTEM 
// RUN BIR 




SAPG DELIMITER 



RUN ASMLGO DSRC=CR1 
FORTRAN COMPLIER DELIMITER 



//RUN FTNLGO DSRC=CRI 



BIR JOB DELIMITER 
FORTRAN PROGRAM DELIMITER 



FORTRAN COMPILER DELIMITER 



//RUN FTNLGO DSRC=CRI DEV5=CR1 



(B)l 30751 



NOTE. I . BIR REQUIRES A CARD READER FOR INPUT 

Figure 6- 1. BIR Input Deck Structure 

6.2.2 RUN COMMAND 

The Run command used with BIR is identical to the JCL Run command and 
defines the JCS that loads and executes the requested job. This command is 
described in Section II of this manual. 

6. 2. 3 DATA CONTROL COMMAND 

The Data command (//DATA) identifies the start of the user data input. This 
command must be included following the Run command and before the data 
stream whenever data appears in the job input to BIR. The Data command 
for BIR contains only the six character symbol, //DATA. Other information 
may be included, but BIR ignores that input. Only one DATA command is 
allowed in a BIR job. The data deck must be organized in the order expected 
by the user program. The data deck cannot contain intermixed control cards. 

6. 2. 3. 1 SYSIN ASSIGNMENT. If the JCS identified in the Run command 
contains an assignment to the generic device, SYSIN (/ASSIGN 6 SYSIN.), 
then the input job must contain a Data command. When BIR reads the Data 
command, it deallocates the input device and suspends operation until the 
user program terminates. The user program then executes and is assigned 
the same input device. The program acquires all data from this peripheral 
as it is needed until processing terminates. At that point, BIR reactivates 
and scans the input from the peripheral device for a new Job command. 
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6. 2. 3. 2 DEVICE ASSIGNMENT. If the user job contains an assignment to 
the same I/O device that BIR is using, BIR again deallocates that device and 
suspends processing until the user job completes. For example, if device 
CR1 is assigned as the input device for BIR and a user job desires input 
from that device, then the user job input must also contain a Data command 
following the Run command, plus the associated input data. BIR then pro- 
cesses the input as if the JCS for the job had assigned the input to SYSIN. 
The JCS may contain many assignments to either SYSIN or the BIR input de- 
vice. All snrVi as sicrnm pnf « H*asi crnaf <=» fT-io carv-io rloiripa 

6.2.4 END OF JOB COMMAND 

The End of Job command (/$) follows the last data input of the user program 
and precedes the next Job command in the input stream. This command re- 
sets BIR for the next job and signals the end of the current job. 

6.3 BATCH INPUT SPOOLER (BIS) 

The BIS subsystem receives input from the assigned peripheral device and 
stores that input on a disc prior to the start of the related program. This 
operation is called spooling. When the program starts, it can access data 
from the high speed disc, rather than from the low speed input peripheral. 

This system allows shorter program execution time and submission of other 
jobs while the first job is executing. Figure 6-2 illustrates a typical deck 
structure for BIS input. The following control commands govern BIS pro- 
cessing: 

//JOB JCL Job command 

//RUN JCL Run command 

//DATA BIS Data Control command 

/$ BIS End of Job command 

6. 3. 1 JOB COMMAND 

The Job command used with BIS is identical to the JCL Job command and de- 
fines the start of the job. This command is described in Section II of this 
manual. 

6.3.2 RUN COMMAND 

The Run command used with BIS is identical to the JCL Run command and 
defines the JCS that loads and executes the requested job. This command is 
described in Section II of this manual. 

6.3.3 DATA CONTROL COMMAND 

The Data command (//DATA) identifies the start of the user data input. This 
command must be included following the Run command and before the data 
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ENTER VIA CONSOLE 
//JOB BIS SYSTEM 
// RUN BIS 



/ ^— BIS JOB DELIMITER 
-SAPG DELIMITER 



//RUN ASMLGO DSRC = SYSIN 



■BIS JOB DELIMITER 




_.. FTNLGO DSRC=SYSIN 
FORTRAN DATA CARDS) 



BIS JOB DELIMITER 
FORTRAN PROGRAM DELIMITER 



y~\_ IDENTIFIES DECK FOLLOWING AS DEV5 FOR COMPILER JCL 
FORTRAN COMPILER DELIMITER 



// JOB 



V 



/~\_ IDENTIFIES DECK FOLLOWING AS DSRC FOR COMPILER JCL 
//RUN FTNLGO DSRC = SYSIN DEV5 = SYSIN 



(B)130752 



NOTES 1 . BASED ON A MINIMUM CONFIGURATION AND SUPPLIED FTNLGO SEQUENCE 
2 I BIS REQUIRES CARD READER FOR INPUT 



Figure 6-2. BIS Input Deck Structure 
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stream whenever data appears in the job input to BIS. More than one Data 
command may appear in the input to BIS, Each Data command is in the 
form: 

//DATA f [<pi>] f [<p 2 >]. 

6.3.3.1 PARAMETER <p>. Parameter <p> is optional. If supplied, 
this field contains the letter J. If BIS detects the letter J in this field, it 
spools all cards following the Data command onto the disc including any sub- 
sequent Data commands. In this mode the End of Job command (/$) is the 
only job delimiter. If the letter J is not supplied in this field, BIS interprets 
subsequent Data commands as well as End of Job commands as data deck 
delimiters. This allows the data input to be subdivided for use by different 
portions of the program. If the Data command contains a J entry, it must 
be the last Data command in the input stream since the remaining cards are 
not interpreted. 

6.3.3.2 PARAMETER <p>. Parameter <p> specifies the type of data 
conversion to be used during spooling. Three entries are possible for this 
parameter: 

• A The letter A specifies conversion of the input data to USASCII 

before storing the data on disc. 

_ td tu _ i ~i-4 td „: f: „~.~..„ — ,, j ~,~ ~r *-i : t. j~.t„ u — z~:. 

w j_> me icuci jj spctmca tuuvcisiuu vjj. luc input, uaia wj u±ii<xry 

before storing the data on disc. 

• D The letter D specifies storing the data directly on disc as it is 

read from the input device. 

If this parameter is not included, BIS defaults 'to converting the input data 
to USASCII code for storage on the disc. 

6.3.3.3 ASSIGNMENTS. All assignments for input data under BIS must 
be made to SYSIN. BIS does not allow an assignment to the device that it is 
using. Programs may have more than one assignment to SYSIN. Each as- 
signment to SYSIN must have' a separate data deck preceded by a Data com- 
mand. The input data sets must be organized in the same order as their 
respective assignments. The first assignment to SYSIN in the JCS reads 
the first data set, the second assignment reads the second data set, etc. 

6.3.4 END OF JOB COMMAND 

The End of Job command (/$) follows the last data input of the user program 
and precedes the next Job command in the input stream. This command re- 
sets BIS for the next job and signals the end of the current job. If a //DATA 
J. Data command occurred in the job, the End of Job command is the only 
command that terminates data input. 
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6.4 BATCH OUTPUT SPOOLER (BOS) 

The BOS subsystem allows the user program to store output data on a high 
speed disc file during program execution. The subsystem then retrieves 
the data from the disc when the program is complete and writes the data on 
the designated output device. This output spooling feature can be used only 
if a System Output Queue (SOQ) file is installed on the system disc. The 
operating system verifies the existence of SOQ at each initial program load- 
ing (IPL). If SOQ is available, then any job may use the output spooling 
feature by assigning the output LUN to SYSOUT. All data written to 
SYSOUT is stored on the disc until the job string terminates. At that time 
if BOS is running and not busy, it begins to output the data to the assigned 
device. If BOS is not running, it will print out the data as soon as it is ac- 
tivated with the Job and Run commands. 

A job step may assign up to 26 LUNs to SYSOUT; however, the total number 
of LUNs assigned to SYSOUT in a job string is also limited to 26. When the 
data is spooled, it is separated on the disc according to LUN. Therefore, 
when the data is printed out following completion of the job, all data written 
to one LUN will be printed before any data is printed that was assigned to a 
different LUN. This system provides a degree of organization to the output 
data that cannot be achieved by assigning multiple LUNs to the same output 
device directly. In that case the data is printed chronologically as produced 
by the program. When the data is spooled, it can be divided into functional 
groups. 

6. 5 BIR AND BIS EXAMPLES 

1. //JOB JBNAME USER01 
//RUN JSBKEY 

/$ 

The JOB command specifies a user job with jobname JBNAME under userid 
USER01. The JSB file defaults to the standard system JSB file under DX980. 

The RUN command directs the system to retrieve the JSB with the name 
JSBKEY from the system JSB. 

2. //JOB JBNAME USER01 FILE=(1, USER2, FILEX) 
//RUN JSBKEY 

/$ 

This example is identical to the previous example except that the JSB file is 
on disc unit number one with userid USER2 and filename FILEX. 

3. //JOB JBNAME USER01 

//RUN JSBKEY INPUT=CR2 FILE=(USER3, FILE2) 
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The keyword INPUT, established at JCL translation time, is overridden 
with device assignment CR2 representing card reader number two, CR2 is 
not the batch input peripheral. Keyword FILE is overridden to specify a 
specific disc file. 



4. //JOB 
//RUN 
//DATA 



JBNAME 

JSBKEY 

A 



USER01 

INPUT=SYSIN 



data 



/* 

/$ 

Input is from the device assigned to the batch subsystem. If executed under 
BIS. data is converted to USASCII before spooling. BIR ignores the letter A 
in the Data command. 



5. //JOB 
//RUN 
//DATA 

data 



JBNAME 
JSBKEY 



USER01 
INPUT=CR1 



/* 

/$ 
If CR1 is the system input device, BIS will not recognize this job. BIR ig- 
nores the letter A in the Data command. 



6. //JOB 
//RUN 
//DATA 



JBNAME 
JSB002 
J, A 



USERO 1 
INPUT=SYSIN 



data 

/* 
//DATA B 

(listing continued on next text page) 
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data 



/* 

/$ 

For BIS the //DATA B card is spooled to disc as data because of the 'J' on 
the first //DATA card. BIR also ignores the //DATA B card, because the 
first Data command suspended the system to wait for job termination (/$). 

6.6 BIS EXAMPLE 

//JOB JBNAME USER01 

//RUN JSB001 INPUT 1=SYSIN INPUT2=SYSIN 

//DATA A 

data (a) 

/* 

//DATA B 

data (b) 

/* 
/$ 
Data (a) will be with INPUT 1 and data (b) will be with INPUT 2. 
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SECTION VII 
INTERACTIVE TERMINAL SUBSYSTEM 



7. 1 OVERVIEW 



The Interactive Terminal Subsystem (ITS) is that portion of DX980 that sup- 
ports interactive peripherals such as teleprinters and full duplex CRTs. In 
particular a single version of ITS allows intermixin 0- in an* r configuration of 
the following terminals: 

• Model 733 ASR 

• Model 733 KSR 

• Model 33 ASR 

• Full duplex 912 CRT 

The ITS and the terminal user communicate with input commands and output 
data or messages. The primary difference in the type of terminal, from the 
terminal user's viewpoint, is the amount of information that can be displayed. 
Teleprinters provide a single display line whereas CRTs provide up to 24 
display lines. 

*7 1 1 

t • 1. 1 

Under ITS a full duplex CRT may be supported either as a single line or a 
multi-line device. Single line or multi-line support is determined when 
building the PDT for the CRT at IPL time. If single line mode is selected, 
the CRT functions exactly as a teleprinter. If multi-line support is specified, 
on-screen editing allows convenient operations not possible with a teleprint- 
er. In this section references to a CRT applies specifically to a CRT oper- 
ating in multi-line mode. The CRT should be regarded as a teleprinter if 
single line mode is to be used. 

The ITS and the terminal user communicate using input commands and output 
data or messages. The first line of a CRT screen is dedicated to commands 
and error messages. The remainder of the screen displays data. The 
operator must enter requests to ITS in line 1. Each request (command) to ITS 
must be followed by a period or have blanks (spaces) for all remaining posi- 
tions in line 1. Depending on the type of request, the operator may also 
enter lines of data prior to notifying ITS that the screen is ready for process- 
ing. The operator can modify data on the screen with the cursor positioning 
keys in conjunction with the data keys. Any data change is echoed to the 
screen and stored simultaneously in the CRT buffer in the main memory. 
The effective screen size for on-screen editing can be specified within a 
range of 2 to 24 lines. The size impacts the amount of main memory re- 
quired to support the terminal since each terminal must have a main memory 
buffer of 40 words per display line. When the operator has completed the 
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message on the screen, he transmits the message to the system by pressing 
carriage return (CR). 

7. 1. 2 TELEPRINTERS 

Communication between the ITS and a teleprinter is in a one-line format. 
Each input line must be entered completely before notifying ITS to accept 
the input. ITS responds with data one line at a time. The operator keys in 
a request to ITS at the terminal and terminates it by depressing carriage re- 
turn (CR). If terminal data is required to complete the request, ITS returns 
control to the terminal and rings the bell. At that time the user enters a 
data line and presses CR. This procedure continues until the request is sat- 
isfied. Mistakes made during command or data entry can be corrected by 
pressing CRTL H repeatedly to backspace until the carriage is positioned 
over the character in error. Starting at that point, the remainder of the line 
can be reentered correctly. When the operator presses the first reentry key, 
the DX980 terminal handler issues a line feed before echoing the character. 
Thus, the corrected data appears immediately below the original data. If 
this technique is employed several times, the data line resembles a stair- 
case. Pressing CTRL N displays the entire data line on a single line. If the 
line is uncorrectable, the terminal user can start over by pressing RUBOUT 
and reentering the line. 

7. 1. 3 ITS TERMINAL ASSIGNMENTS 

ITS runs as a privileged program and can be activated via the RUN command 
from the system console. (The system console can be any data terminal de- 
vice.) The terminal assignments for ITS are normally incorporated into the 
JCL sequence for ITS, but can be overridden in the Run command at submis- 
sion time by specification of Ti=<devnam>. For this notation, i is in the 
range of 1 through the number. of terminals at the installation and <devnam> 
is the mnemonic representation for the subject terminal. Assignments may 
be made to the system console (SC) and to the dummy device (DUMMY). Any 
program, including ITS, can assign the system console as one of its devices. 
Thus it can serve a dual purpose both as a system console and as a user ter- 
minal. When assigned to a program, the console displays the message 
USER MODE to notify the operator that the console has switched modes. At 
that time the operator can use the console as any other terminal. Pressing 
CTRL O switches the console back to system mode. After completion of the 
system duties, the console can be switched back to user mode with CTRL U. 
Assigning a terminal to DUMMY is a useful technique for starting ITS when 
one of the normally active terminals is inoperative. This assignment affect- 
ively deletes the corresponding assignment in the original JCL sequence. 
The following sample entries illustrate initiation of ITS from the System Con- 
sole: 

(1) //RUN ITS Start ITS with default assignments. The 

"//" is displayed in response to pressing 
the escape key (ESC). 
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(2) //RUN ITS T1=SC 



(3) //RUN ITS T1=SC, 
T3-DUMMY 



Start ITS with an assignment to the sys- 
tem console in addition to the default as- 
signments to other terminals. Tl could 
have been given a default assignment of 
DUMMY in the expanded JCS which would 
require positive action for assignment to 
the system console. 

Same as example (2) except that the ter- 
minal nQrmallv aegicniaH fQ T"3 ic inriT»_ 

erative. 



7.1.4 ITS MEMORY REQUIREMENTS 

The memory requirements of ITS vary depending upon the number of termi- 
nals, the type of terminals, and whether the terminals are going to use the 
Remote Job Entry capability of ITS. ITS requires approximately 6000 words 
of JAREA, plus 125 words of JAREA per (one-line) terminal and 150 words 
of JEA per terminal. If the terminal is a multi-line CRT, then 40 words per 
display line must be added to the JAREA. If the terminal is going to use the 
Remote Job Entry capability, then 500 words must be added to the JAREA 
and 350 words must be added to the JEA. 

7.1.5 REMOTE TERMINALS 

After ITS is activated, a read is issued to each assigned terminal. This 
command rings the terminal bell and activates the terminal for input. If the 
assigned terminal is connected through a telephone data set, the data set is 
conditioned so that the terminal is immediately activated when the telephone 
connection is made. The procedure for establishing cojmmunications between 
a telephone dataset and a terminal equipped with an acoustic coupler is as 

1) Dial the assigned number and wait for the data set tone (a high pitch 
squeal). 

2) Plug the handset into the acoustic coupler (the acoustic coupler 
must have the Mode switch set on "Full Duplex"; the terminal Mode 
switch must be set to "Line"). 

3) Terminal is ready for use. 



7.1.6 LOGON 

When communication is established between ITS and a terminal, the termi- 
nal user must enter a Logon command to gain access to ITS facilities. The 
format of the Logon command is as follows: 

LOGON <userid> <acctno> 
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The Logon command converts a terminal from the inactive state to the ready- 
state. When the terminal is in the ready state, all the services of ITS be- 
come available to the user. The notation <userid> and <acctno> correspond 
to user identification and account number respectively. Depending on the 
installation, a future enhancement to ITS will use three parameters for val- 
idation against a file of acceptable combinations and recording along with the 
elapsed time of an ITS session for accounting purposes. The present version 
of ITS requires them for syntactic validation. The <userid> field is limited 
to six characters, the first of which must be alphabetic. The <acctno> field 
is a positive integer that must be less than 32, 768. All ITS command op- 
erands may be separated by a single comma, one or more blanks, or a 
comma and one or more blanks, 

7. 1. 7 OTHER ITS COMMANDS 

After the Logon command has been validated, the message 'READY' is dis- 
played on the terminal. At this point the following commands are valid 
(brackets denote optional fields): 

• LOGOFF 

• EDIT FILE=(<volume>, <fileid>, <filnam> [,< pswd>]) 
[LRECL=<lrchar>] 

• ENTER FILE=(<volume>, < fileid>, <filnam> [,<pswd>]) 
[LRECL=<lrchar>] [EXTEND] 

• JOB <jsname> <userid> [FILE=(<volume>,<fileid>, <filnam>[,<pswd>])] 

• RUN <jcsnam> . . . 

• STATUS [<jobnum>] 

• DELETE FILE = (<volume>, <fileid>, < filnam>[,<pswd>] ) 

The Edit and Enter commands gain access to the Interactive File Editor 
(IFE). The Job and Run commands enter the Remote Job Entry (RJE) facility. 
The Stat command accesses the Computer Status Display (CSD) facility. The 
Logoff command returns the terminal to the inactive state. 

7.2 INTERACTIVE FILE EDITOR 

The Interactive File Editor (IFE) is an integral part of the Interactive Ter- 
minal Subsystem (ITS). It supports teleprinters, and full duplex CRTs. IFE 
allows the user to display, insert, delete or replace records from the file, 
as well as create an entirely new file from the editing terminal. Two utility 
programs, BLDEDT and DXCOPY, construct the file for editing, and trans- 
fer the edited file back to the user file. Two editing commands, ENTER and 
EDIT, add or delete records from the file. Figure 7-1 illustrates the data 
transitions that may occur within the scope of file editing. IFE operates 
only on key indexed files. The file must be constructed such that the keys are 
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Figure 7-1. Interactive File Editor Transitions 



the record numbers and the data is the source text. The first record must 
have a key of " 1", the second record "2", etc. . Either of two methods can 
create a file in this form. The first method is a utility program name 
BLDEDT. BLDEDT accepts input from a sequential access source and 
copies the input data into a key indexed file suitable for use by IFE. The 
second method is to use IFE to create a suitable edit file. The Enter com- 
mand causes IFE to create a new key indexed file and accept the new text 
from the user terminal record by record. Adding EXTEND to the Enter 
command causes IFE to add new input to an existing edit file. Once a suit- 
able edit file is created, IFE may be used to modify it by inserting, replac- 
ing, or deleting specified records. This is accomplished with an Edit com- 
mand. While editing, the record number keys in the Edit file become 
nonconsecutive due to deletions and record insertions without keys. The 
keys (or record numbers) may be cleaned up by recopying the file using the 
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BLDEDT utility. When editing is complete, the user may employ the 
DXCOPY utility with the "NOKEYS" option to transcribe the key indexed file 
into a linked sequential file. However, in most cases the edited material may 
be left in the key indexed file. The Assembler, the Compiler and other pro- 
grams accept input from a key indexed file resulting from IFE. 

When using IFE the escape key (ESC) stops input, output, or processing and 
returns control to the terminal. 

The IFE command set can be separated into three basic catagories: file 
commands, edit commands, and state transition commands. Each command 
is independent of the type of terminal (teleprinter or CRT) that originated 
the command. Special exceptions are noted as they are encountered in the 
following command descriptions. 

7.2. 1 FILE COMMANDS 

The IFE File commands assign, create or extend files for use by the IFE. 

7.2. 1. 1 EDIT FILE. The Edit File command (EDIT FILE) directs IFE to 
assign an edit file to the requesting terminal for interactive file editing. 
The file must have been previously created by the Build Edit File (BLDEDT) 
program or by an Enter File command, The Edit File command is per- 
mis sable only when the terminal is in the Ready state. The format for the 
Edit File command is as follows. The interpretation of each parameter is 
identical to that specified in the JCL description in Section II of this manual. 
The default value for LRECL is 80 characters. 

EDIT FILE=(<volume>, <fileid>, <filnam> [, <pswd>]) [LRECL=<lrchar>] 

After IFE has processed the Edit File command, it converts the terminal to 
the Edit state and returns the first record(s) in the file to the terminal. At 
this point, the user may enter edit commands or state transition commands 
to control further processing. 

7. 2. 1. 2 ENTER FILE. The Enter File command directs IFE to create a new 
file or extend an existing file using data from the terminal. The file is a key 
indexed file. If the file is being created by the Enter File command (EXTEND 
option not specified), then the maximum number of tracks allowed for the 
file is 2 5 which accommodates about 1200 lines of text. The access codes of a 
file created with the Enter File command are (Any, Any, Any, None) unless 
a password is specified in the command in which case the access codes are 
(Any, Pswd, Pswd, None). As each record is entered into the file, IFE as- 
signs a record number to it that can be used in subsequent editing sessions. 
Enter File generally used for manual entry of data as with key-to-disc sys- 
tems. Operation with this command is identical when using either a tele- 
printer or CRT as a terminal. Control returns to the terminal after each 
record is processed and awaits entry of the next record. For this command 
line 1 of a CRT contains data rather than commands. 
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The format for the Enter File command is as follows. The <fileid> param- 
eter must have been previously defined via the CATLOG utility from the sys- 
tem console. The < filnam> parameter may be new if the command creates a 
new file. Default value for LRECL is 80 characters and defines the line- 
width for the terminal. 

ENTER FILE=(<volume>, <fileid>, <filnam> [, <pswd>]) 
[LRECL=<lrchar>] [EXTEND] 

The Extend parameter of the Enter File command extends previously created 
files by adding records to the end. As each record is added, IFE assigns the 
next consecutive record number to it as with newly created files. 

After IFE has processed an Enter command, it returns to the user and 
awaits entry of data records. The length of each input record, keyed in at 
the terminal, is controlled by the carriage return (CR) on a teleprinter or 
number of characters per line on a CRT. The record is padded out with 
blanks if the record length is less than LRECL, and is truncated if record 
length is greater than LRECL. A zero length record (CR only) causes IFE to 
stop accepting records to put in the file, and IFE returns to the Ready state. 

7.2. 1. 3 DELETE FILE. The Delete File command directs IFE to delete a 
file. The file is deleted if the integrity code which ITS is running under 
allows the deletion. 

7.2.2 EDIT COMMANDS 

The basic format for all Edit commands plus the first two operands is as 
follows: 

{command} [RN=][±]M [, N] 

The braces,] |, indicate a mandatory field containing the command or opera- 
tor. The brackets, [ ], indicate options. The parameter, M, is either an 
absolute or relative record number depending upon the presence or absence 
of a preceeding [RN=] field. The absolute record number indicator, [RN=], 
directs IFE to select record number M from the record numbers that were 
originally recorded in the edit file. Since the record numbers start at 1 and 
are all positive, a minus sign for M does not have a general interpretation 
for absolute record numbers. However, two special cases exist for starting 
in front of the first record in the file (Beginning of File or BOF), or after the 
last record (End of File or EOF). The two cases are: 

RN=0 Positions file at BOF 

RN=- 1 Positions file at EOF 

Any other absolute record number for M must correspond to a record num- 
ber that exists in the file. If not, the message ,r RECORD NOT FOUND" is 
displayed following the command. 
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If the [RN=] field is not used, then M specifies a relative record position. 
That is, it uses the current record position as a point of reference within 
the edit file to access other records. The current record is the first data 
line displayed on a CRT or the last data line that was printed on a teleprinter. 
Specification of relative record position within a command directs IFE to 
move forward (+) or backward {-) M records. If the sign field is not present, 
+ is assumed. The current record is defined as relative record number 1, 
the next record is record 2, etc. If the sign field specifies a minus number, 
-1 refers to the record immediately preceeding the current record, -2 to the 
record preceeding -1, etc. If is specified as a relative record number, 
IFE converts it to +1. The one exception to this rule is for the Insert Record 
command for CRTs. See examples for that command. The parameter [N] 
specifies the number of records to be processed. Processing occurs after 
the new file position has been established. If not specified, [N] defaults to 1. 
The following examples illustrate the use of the M parameter and its associ- 
ated fields: 



RN=1 
RN=^3 



+ 1 



Position at record number 1 in the edit file 

Error: An edit file cannot contain a record number 
of -3 

Position at the current record: On a teleprinter this 
specifies the last record printed. On a CRT it speci- 
fies the first data line displayed (the first data line is 
actually line 2 on the screen, since line 1 is reserved 
for commands) 



1 Same as +1 

-3 Position at the record that is three records before 

the current record. 

RN=5, 2 Position at record number 5, then process two records. 

3, 1 Position at the record that is two records beyond the 

current record, then process one record 

3 Same as 3, 1 



7.2.2. 1 FIND RECORD: F[RN=][±]M. This command establishes a new 
current record and displays it at the terminal. If the terminal is a CRT, it 
fills the screen with records from the file starting at the new current record. 

7.2.2.2 REPLACE RECORD: R[RN=][±]M[, N]. This command establishes 
a new current record and replaces N records in the file with new records 
entered from the terminal. If the new replacement record has a pound sign 
(#) in column 1, it deletes the corresponding file record but does not re- 
place it with a new record. This character allows simultaneous deleting and 
modifying of replacement records. After the replacement process is com- 
plete, the record immediately following the last record replaced becomes the 
current record. 
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When this command is entered from a teleprinter, IFE returns control to the 
keyboard to accept N records (one at a time). Each time a record is entered, 
IFE deletes the corresponding record from the file and, unless a # is in 
column 1, replaces the old record with the new replacement record, as en- 
tered. If a null length record is transmitted (user enters only a carriage re- 
turn), then IFE terminates the replacement process and returns control to 
the keyboard to accept a new command. The Replace command has a slightly 
different interpretation when entered from a CRT. The records displayed on 
the screen become the replacement records even if they originally came from 
the file. This feature allows multiline editing from a CRT. The records 
displayed on the screen by any previous command can be modified on the 
screen and then used as replacements for the corresponding records in the 
file. Since the new replacement records come from the screen. image, this 
command should not be used immediately following a List command which 
displays information other than just the records from the file. 

The absolute record number option, [RN=], is not valid from a CRT. 

The following examples illustrate the use of this command: 

• R 1, 3 Replace the current record and the two successive 

records. When entered from a CRT, the replacement 
records come from data lines 1, 2, and 3; when entered 
from a teleprinter, control returns to the terminal 
three times to accept three replacement records. On 
any type of terminal, a replacement record with # in 
column 1 deletes the corresponding file record and 
does not add the replacement record. 

• R RN=1, 3 Same as R 1,3 except that the records are the file rec- 

ord with record number I and the two successive file 
records. This command is not valid from a CRT. 



• R 5, 4 Replace the file record which is 4 records beyond the 

current record and the three following records. When 
entered from a CRT, the replacement records come 
from data lines 5, 6, 7, and 8; when entered from a 
teleprinter, control returns to the terminal four times 
to accept four replacement records. 

7.2.2.3 INSERT RECORD: I [RN=][±]M [, N]. This command establishes 
a new position and inserts N records following the new current record. The 
insertions can be terminated short of N records from a teleprinter by trans- 
mitting a null line. After processing is complete for the Insert Records 
command, control returns to a teleprinter with the print head in position one 
and the bell rings. When executed on a CRT, the displayed data opens at the 
insertion point to make room for inserting records. A # appears in column 
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one of each insertion record and the remainder of the record contains blanks. 
Insertion of records from a CRT is accomplished with a user entered 
Replace Record command after the new records have been keyed into the data 
lines that were opened for insertion. Each # must be eliminated before exe- 
cuting the Replace Record command, or the record will not be inserted. 
The absolute record number option is not valid from a CRT. The following 
examples illustrate the use of this command: 

• I 1,3 Insert three records after the current record. When 

entered from a CRT, the current record is maintained 
on data line 1; data lines 2, 3, and 4 are blanked out 
except for a # in column 1. The record that was pre- 
viously displayed on data line 2 is in data line 5, data 
line 3 moves to data line. 6, etc. The user-entered Re- 
place Record command that would normally follow this 
command is R 2, 3. This accomplishes the actual in- 
sertion of the records (that the user has keyed into data 
lines 2,3, and 4) over the top of the lines which IFE dis- 
played with the # in column 1. When entered from a 
teleprinter, IFE returns control to the terminal three 
times to accept three insertion records. If the user 
enters a null line (enters only a carriage return), then 
the insertion process is terminated and IFE requests a 
new command. 

• I RN=5, 3 Insert three records after record number 5. Not valid 

from a CRT. 

• I RN=0, 2 Insert two records before the first record in the file. 

Not valid from a CRT. 

• I 0,2 Insert two records after the current record. If entered 

from a CRT, data lines 1 and 2 are\blanked out except 
for a # in column 1; and if the normal Replace Record 
command of R 1,2 is then entered, the records actually 
get inserted before the record that is considered the 
current record at the time this 10,2 command is en- 
tered. In this way, records may be inserted before the 
first record in the file. 

• I -1,4 Insert four records after the record which precedes the 

current record. Not valid from a CRT. 

NOTE 

Since, on a CRT, this command is normally followed 
by a Replace Record command (which gets replacement 
records from the lines on the CRT exactly as they are 
displayed), the Insert Record command should not be 
used immediately following a List Record command. 
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7.2.2.4 DELETE RECORD: D[RN=][±]M[ , N], This command finds a new 
current record and deletes N records starting with the new current record. 
After the appropriate records are deleted, the current record is then changed 
to be the record which follows the last deleted record. If records are deleted 
from a CRT screen, the displayed data closes to reflect the new contents of 
the edit file. The following examples illustrate the use of this command. 

• D 1, 2 Delete the current record and the record which follows 

it. When complete, display the new current record. 

• D RN=5, 3 Delete record number 5 and the following two records. 

• D RN=0, 4 Delete the first four records of the file. 

7.2.2.5 FIND STRING: FS [RN=][±]M [, N][C1:C2] /STRING/. This com- 
mand finds a new current record and searches N records for the subject 
string. The search for the string occurs between record columns CI and 
C2. A slash within a string is denoted by a double slash, i.e. // = /. The 
Find String command is used in the same manner as Find Record except that 
IFE searches for an occurrence of the specified string within the record 
limits specified. If C 1 and C2 are not specified, IFE searches each record 
between column 1 and LRECL. The limits CI and C2 restrict the search to 
fewer than LRECL characters to eliminate unwanted matches and to decrease 
the search time. The following examples illustrate the use of this command: 



in / A -d/" 1 / 

1U / XTLi_>V-</ 



C ^ r» *• *-• V> 4- Vi fs\ n rt T-i +■ an r> a r* r\ y f\ i 



of a vH nor 



FSRN=10, 50 1:10 /XY//Z/ 



with record number 1 for the string 
ABC. Establish the record contain- 
ing ABC as the new current record. 
If the string is not found, display 
"STRING NOT FOUND" message and 
maintain the original current record. 

Search through fifty records starting 
with record number 10 for the string 
XY/Z. Limit the search to record 
columns one through ten. 



7.2.2.6 REPLACE STRING: RS [RN=][±]M [, N][C1:C2]/STRING1 / 
/STRING2/. The Replace String command is identical to Find String except 
that STRING2 replaces the first occurrence of STRING 1. If the lengths of 
STRING1 and STRING2 are different, the insertion is made and the record 
length is adjusted accordingly. If the adjusted record length is greater than 
LRECL, the record is truncated to LRECL. If the new record length is 
shorter than LRECL, the record closes and fills with blanks from the right. 
The use of consecutive slashes for STRING2 denotes a null string and deletes 
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STRING1 from the record. The following examples illustrate the use of this 

command: 

• RS 1, 10 1:20 /ABC/ /DEF/ Search through 10 records starting 

with the current record for the 
string ABC. If ABC is found, sub- 
stitute the string DEF, otherwise 
display the message: "STRING NOT 
FOUND". Limit the search to col- 
umns 1 through 20. 

• RS RN=1, 10 /ABC/ // Search through 10 records starting 

with record number 1 for the string 
ABC. If ABC is found, substitute 
a null string, close up the record 
and fill with blanks from the right. 
Otherwise, display the message 
"STRING NOT FOUND". 

7.2.2.7 REPLACE ALL STRINGS: RA [RN=][±]M [, N][C1:C2] /STRING1 / 
/STRING2/. Replace All Strings is identical to Replace String except that 
STRING2 replaces every occurrence of STRING 1 in the subject records. The 
current line is relocated to the record which follows the N lines searched. 

7.2.2.8 LIST RECORD: L [RN=][±]M[ , N]. This command establishes a new 
current record and lists N records starting at that point. When the listing is 
complete, the current record remains at the first of the N records listed. 
The format of the listed records is as follows: 

1. If the record has a record number associated with it (the record was 
not inserted with an Insert Record command since the last time the 
file was built), then the record number (maximum of four digits) 
followed by a separator blank and the record are displayed. The rec- 
ord is truncated on the right to fit the display line. 

2. If the record has no associated record number, then five blanks and 
the record are displayed. Again, the record is truncated on the right 
to fit the display line. 

The List Record command is intended for low volume listing and is, there- 
fore, a relatively slow operation. For high volume listing, use the LSTEDT 
utility . 

7. 2. 3 STATE TRANSITION COMMANDS 

The state transition commands permis sable in the edit state are Stop and 
Logoff. Stop returns the terminal to the ready state. Logoff returns the 
terminal to the inactive state. No state transition commands are permissible 
from the enter state. The only option available to change states is a null 
transmission which switches the state from enter to ready. 
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7.3 REMOTE JOB ENTRY 

The Remote Job Entry (RJE) facility in ITS provides interactive access to the 
job management system of DX980 through a user terminal. RJE accepts two 
basic commands: Job command and Run command, Both commands are 
valid from the ready state only. 

7. 3. 1 JOB COMMAND 

The Job command is optional when submitting a job via ITS. However, if it 
is specified, it must immediately precede a Run command. The format of 
the Job command from ITS is identical to that from any other system source. 
If the Job command is not supplied, the default values are as follows: 

• <jsname> - <userid> from Logon command 

• <userid> - <userid> from Logon command 

• <devnum> - 1, corresponds to DISCI 

• <fileid> - SYSTEM 

• <filnam> - SJCBFL, the system JCL file 

• <pswd> - none 

7.3.2 RUN COMMAND 

The Run command is required to start a job from ITS. The format of the 
Run command is identical to that from any other source. One additional op- 
tion available to ITS users is the assignment of the user's terminal to the 
job being started. This can be very useful if the terminal is located at a re- 
mote site. The user can assign the terminal through a device assignment of 
TERMIO. Expanded JCL sequences allow changing device assignments through 
the use of keywords. Any device keyword can be assigned to the psuedo- 
physical device name, TERMIO. ITS substitutes the true device name for 
TERMIO before submitting the job. For example the expanded JCL may 
specify: DEVICE:=INDEV. In the Run command the user may state: 
INDEV=TERMIO. In this case ITS substitutes the true device name for 
TERMIO. That device name may be CRT3 or any other device previously 
assigned to TERMIO. The pseudo-physical device name, TERMIO, must be 
specified in the Run command. It may not be specified in the expanded JCL. 
As many device names as desired can be assigned to TERMIO and each name 
is converted to the subject terminal. "When the job is started, ITS releases 
the terminal until the job is complete. At that time ITS reacquires the ter- 
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minal and activates it for further communication. The following example 
illustrates the device assignment option of the Run command: 

RUN XA SRCDEV=DISC1, SRCFIL=(USER0 1, MYPROG) ; 

LSTDEV = TERMIO, ERRDEV=TERMIO, OBJDEV=PTPl 

Run the assembler with input from a 
file with file name "MYPROG" 
(possibly created and edited using 
IFE). Assign listings and error 
messages to my terminal (TERMIO) 
and assign the object output to the 
paper tape punch. 

7.4 COMPUTER STATUS DISPLAY 

The Computer Status Display facility in ITS determines system status either 
before or after submitting a job through the RJE facility. Entering the fol- 
lowing command at the terminal displays the status of all programs in the 
system: 

STATUS 

The statistics for all steps within a specific job can be displayed by entering 
the command in the following form: 

STATUS <jobnum> 

7.5 ITS ERROR MESSAGES . 

ITS error messages fall generally into three catagories. 

A. Messages of the form: 

ERROR NNNN where NNNN is a four digit error number. These 
error messages are given only by the Remote Job Entry and Com- 
puter Status Display facilities. The error numbers are passed to 
ITS by DX980 and are documented in Appendix A. 

B. The message: 

INSUFFICIENT MEMORY, TRY AGAIN LATER 

This message is given only by the Remote Job Entry and Computer 
Status Display facilities and indicates that there is not enough avail- 
able memory in the ITS area to perform the request. If several 
terminals are currently using ITS, then more memory may be avail- 
able later as operations for other terminals are completed. 
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C. IFE Error Messages: 

.INVALID COMMAND 
.DISC OFFLINE 
.INVALID FILE TYPE 
.INVALID ARGUMENT 
.ARG COUNT ERROR 
. ARG RANGE ERROR 
.RECORD NOT FOUND 
. STRING NOT FOUND 
. STRING TOO LONG 
.INSUFFICIENT MEMORY 
. FILE ASSIGN ERROR 
. FILE BUSY 
.FILE FULL 
. FILE READ ERROR 
. FILE OPEN ERROR 
. FILE I/O ERROR 

In most cases the user can readily discover the problem causing the 
error and then reenter the command correctly to continue. However, 
messages (15) and (16) may be given in response to the user submis- 
sion of the EDIT or ENTER commands and if this occurs the user 

«i ~—i.~— OfrnD _— T r^r*r\rrrr -u~r~~~ —~ i n.i.z 

xnusi ciiici uiui" ux j-ivyvjrwA' x" uciurc rc-isuunuiLUig 

or ENTER command. 



(1) 


(2) 


(3) 


(4) 


(5) 


(6) 


(7) 


(8) 


(9) 


(10) 


(11) 


(12) 


(13) 


(14) 


(15) 


(16) 
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SECTION VIII 
UTILITY PROGRAMS 



8. 1 GENERAL 



A comprehensive set of programming support language processors and utility- 
programs is available for use with the operating system. Sequences of ex- 
panded JCL supplied with a system reside on the system disc in the file ad- 
dressed as FILE=(1, SYSTEM, JCLSRC). Appendix B contains a sample listing 
of some expanded JCL sequences. When specified in a Run command, these 
standard JCL sequences perform, the language processors and utilities. Some 
of these programs, such as the FORTRAN compiler, are not unique to the 
DX980 operating system. These programs are documented in separate man- 
uals. This section provides information concerning the use of these programs 
as they apply to the DX980 operating system. 



8.2 JCL TRANSLATOR (JCLTRN) 

The JCL translator is a utility program that runs in user memory (as opposed 
to running in memory that is allocated to the operating system). This pro- 
gram translates expanded JCL statements into an internal binary representa- 
tion for later processing. Input to the translator can be supplied from any of 
the standard 980 input devices (card reader, cassette, magnetic tape, disc 
files, etc.). Output from the translator is stored on a disc file for later sub- 
mission. Since the translator is a utility program, it can be invoked as any 
other user program by using abbreviated JCL form. The saved JCL sequence 
for the translator is stored on the system disc together with several other se- 
quences that are supplied with each DX980 installation. The name assigned 






m 



8.2.1 STANDARD JCL PROCEDURE 

The following JCL is a standard procedure for invoking the JCL translator 
(JCLTRN). 

,# CREATE JCL .COMMENT, "CREATE JCL PROCEDURE ■ 

/REPLACE JCL . CREATE JCL PROCEDURE • 

/EXEC 0BJ»(1, SYSTEM, JCLTRN) HEM*(300, 7550. 1000) PRTY*fl,l5)> 

/ _ TIME«*1 MEM|«MEM PRTY f «PRI 

/ASSIGN 1 SC DEVICEI«D8RC FIlE|«FSrC BUFFERS«1 ' SOURCE INPUT 

/ASSIGN 2 SC DEVICEIpDERR SHaRES«SeRR • ERROR MESSAGE 

/ASSIGN 3 SC DEVICEl-DLST FlLE|»FLsT SHAREl«SLST BUFFERS*! .SOURCE LISTING 

/ASSIGN 4 DISC) DEVICElPDOBJ FlLE«(SYSTEM,SJCBFL,AB) | 

/ PILE?«F0BJ REPLACEl«R0BJ BUFFERS»2 INDEXED! 

/ ACCESS»(ANY,ANY,ANY,ANY) ACcE83|«C0BJJ 

/ ALLOCATE«(1,0,96,20) ALL0CAtE|«L0BJ KEYLEN.6 . OBJECT OUT FILE 

/END 
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8. 2. 2 MEMORY PARTITION REQUIREMENTS 
The memory allocation parameters for the JCL translator are: 
MEM=(300, 7550, 650) 

8.2.3 LUN ASSIGNMENTS 

The LUN assignments required by the JCL translator are listed in table 8- 1. 

Table 8- 1. JCLTRN Logical Unit Assignments 



LUN 


Description 


Comments 


1 


Expanded JCL input 


Any sequential access input device 
file 


2 


Error Message 


Normally assigned to DUMMY when 


3 


JCL echo print 


input is from a Data Terminal; 
otherwise assigned to SYSOUT or 
LP1. 


4 


Binary Format JCL output 


Key indexed file with key length of 
6 characters and a physical record 
length of 96 words. 



8.2.4 OPERATION 

Refer to Section II of this manual for a description of the JCL translator. 

8.2.5 ERROR CODES 

Refer to Appendix A of this manual for JCL error codes. 

8.2.6 SAMPLE INPUT 

Refer to Section II and Appendix B of this manual for sample input sequences. 

8. 3 MASTER FILE DIRECTORY EDITOR (CATLOG) 

The CATLOG utility allows the operator to list, create, or delete users in 
the Master File Directory of any specified disc volume. 
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8. 3. 1 STANDARD JCL PROCEDURE 

The following JCL is a standard procedure for the Master File Directory- 
Editor, CATLOG: 

,# CREATE CATLOG, COMMENT, "LIST, CREATE, OR DELETE USERS" 

/REPLACE CATLOG . LIST, CREATE, OR DELETE USERS , 

/EXEC 0BJ»U, SYSTEM, CATLOG) MEM«(300, 4000, 670) PRTY«(1,5)I 

/ PRIV TIME«-1 PRTYl«PRl 

/ASSIGN SC DEVICEl«DCON SHaREI«SC0N . CONTROL 

/ASSIGN 6 SC DEVICEl«DLST FlLE|«FLST SHARE»»3L8T BUFFERS-1 .USER LISTING 

/END 

8. 3. 2 MEMORY PARTITION REQUIREMENTS 

The job area required to run CATLOG must only be large enough to contain 
the load module since CATLOG requires no work space. Sufficient job area 
is 4000 words; sufficient job extension area is 670 words. 

8. 3. 3 LUN ASSIGNMENTS 

The logical unit assignments needed for CATLOG are listed in table 8-2. 

Table 8-2. CATLOG Logical Unit Assignments 



LUN 


Description 


Comments 



6 


Message Control 
Listing of Users 


Any input/output device 
Any printing device 



8.3.4 OPERATION 

The Master File Directory Editor, CATLOG, is a single task program that 
runs under DX980 in the privileged mode. Since it accesses portions of the 
system which are inaccessible to the user, the CATLOG modules must be 
linked with the system external definition file (SYSTEM, DXEXTD). 

The program, CATLOG, should be run from the system console only. It 
first types the message: 

ENTER COMMAND TYPE- -LIST, CREATE, DELETE- - 

on the message and control device (LUN 0) which is usually assigned to the 
system console. The operator then responds by entering the first letter of 
any of the three commands (i. e. L, C or D), followed by a carriage return to 
select a list, create, or delete user operation, respectively. CATLOG then 
requests the disc volume identification by printing to LUN 0: 

DISC VOLUME ID = 
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The user responds by entering a number between 1 and 20 followed by a car- 
riage return. This number selects the disc pack contained in the disc drive 
with that number. The default for this input parameter is disc drive 1 and 
can be invoked by entering carriage return without selecting a number. 

Beyond this point, CATLOG's response is dependent on the function (list, 
create, or delete) selected. Table 8-3 summarizes the input/output of 
CATLOG for the three functions. The three functions are described sep- 
arately in the next three paragraphs. 

8.3.4. 1 LIST. If the user responds with an L input to select the list users 
function, the utility prints on LUN 6 an alphabetically ordered list of all 
users on the disc volume selected. The utility also prints the date and time 
of request. 

CATLOG provides the following information for each user: 

• User ID - the name of the user associated with the directory. 

• Integrity code - A three-position code that defines allowed operation 
to the user directory for three separate operations. The output 
format is X, X, X, for read, write, delete operations respectively. 
The letter X represents either N, C, or A (NONE, CREAT, ANY, 
the file level integrity codes used as input to the JCL translator/ 
interpreter). Table 8-4 provides an interpretation of the three 
integrity codes as a function of operation at the user level. 

• Current user directory size - the number of tracks currently as- 
signed to the user directory. 

• Maximum user directory size - the maximum number of tracks that 
can be assigned to the user directory. 

In addition to the above tabular data for each user on the disc volume, 
CATLOG prints the following information for the entire disc volume. 

• Number of users 

• Number of tracks available 

• Number of tracks used 
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Table 8-3. CATLOG User Interaction 




CONSOLE OUTPUT 


User Response 


LIST 


CREATE 


DELETE 


ENTER COMMAND TYPE- -LIST, CREATE, DELETE- - 


L 


C 


D 


DISC VOLUME ID = 


any 


disc drive number 1 through 20 
(default = 1) 


USER ID = 




■ — - — 1 — 

A 1 to 6 character alphanumeric 
name of the user ID. (no default) 


INTEGRITY CODE = 




4 alphabetic charac- 
ters, separated by 
commas, designate 
the access codes for 
read, write, delete 
and execute acces- 
ses (default = A, A, 
A, A)* 




MAXIMUM DIRECTORY SIZE = 




Number of tracks to 
designate maximum 
size of user direc- 
tory (default = 1} 





U> 

o 
o 

Ui 
-J 

o 



#N = None 
C = Creator 
P = Password 
A = Any 
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Table 8-4. User ID Integrity Codes 



Operation 


Integrity- 
Code 


Read 


Write 


Delete 


N 








(NONE) 


N, X, X no 


X, N, X no one can 


X, X, N no one can de- 




one can access 


define new files 


lete or replace files 




the files under 


under the user ID 


under the user ID 




the user ID 






C 

(CREAT) 


c, c, c > 


X, c, x D> 


X, x, c > 




only the cre- 


only the creater 


only the creator can de- 




ator can ac- 


can define new files 


lete or replace files 




cess the files 


under the user ID 


under the user ID 




under the 








user ID 






A 








(ANY) 


A, X, X 


X, A, X 


X, X, A 




any one can 


any one can define 


any one can delete or 




access the 


new files under the 


replace files under the 




files under 


user ID 


user ID 




the user ID 







\p> Creator - that user whose < userid > parameter in the JOB 
command matches the < userid> of the directory. 

8. 3. 4. 2 CREATE. If the user responds with a C input to select the create 
user function, the utility requests the following additional information (in 
addition to the disc volume ID): 

• User ID - A 1 to 6 character alphanumeric name of the user ID to 

be created, followed by a carriage return. 

• Integrity code - A 3-position code that defines allowed operation to 

the user directory for three separate operations. 
The input format is X, X, X for read, write, delete 
operations, respectively. The letter X is N, C, or 
A. See table 8-4 for an interpretation of the three 
integrity codes as a function of operation at the 
user level. The default for this input parameter is 
A, A, A for unlimited user operations. 
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• Maximum user size - A decimal number that designates the maxi- 
mum number of tracks to be assigned to the 
user directory. The default is 1 track. 

The program then creates the designated user by entering a user file direc- 
tory (UFD) keyed on the user ID into the master file directory. 

8. 3. 4. 3 DELETE. If the user responds with a D input to select the delete 
user function, CATLOG checks for other jobs running in the system before 
continuing. If other jobs are running, an error message is printed to LUN 
and the CATLOG job is terminated. If the job does not terminate at this 
point, the utility requests (in addition to the disc volume ID) only the user ID 
to be deleted. The utility then deletes the user file directory (UFD) from the 
master file directory as well as all files created under that user ID. The 
CATLOG delete function should not be used to delete individual files under a 
user, but only to delete an entire user directory, including all files residing 
within that directory. The delete function of CATLOG may be used only when 
no other jobs are in the system. 



1.3.5 ERROR CODES 



Table 8-5 lists the possible error/termination message printed by CATLOG 
to LUN 0. Those that are possible only when a specific function is requested 
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Table 8-5. CATLOG Error Messages 



Message 



NORMAL TERMINATION 



ILLEGAL COMMAND 



TOO MANY JOBS IN THE SYSTEM 



ILLEGAL INTEGRITY CODE 



BAD DATA 



Current 
Function 



D 



Meaning 



Process performed cor- 
rectly no errors 

First character of Com- 
mand input not an L, C, 
or D. 

Delete command- cannot 
be run if there are other 
jobs running under 
DX980. 

Create command-user 
integrity code is not of 
format X, X, X where X 
is A, C, N. 

Numerical input not a 
valid decimal integer. 
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Table 8-5. CATLOG Error Messages (Continued) 



Message 



ILLEGAL DEVICE ID 

DISC OFFLINE 

PREV. DEFINED USER ID 



ILLEGAL USER ID 



USER ID MISSING 



Current 
Function 



D 



D 



Meaning 



Device ID not in the 
Physical Device Table 
chain. 

Disc is not enabled. 

Create command- user 
ID already defined in 
the Master File Direc- 
tory. 

Delete command-user 
ID not found in the 
Master File Directory. 

Delete command-user 
directory file control 
block is not in the file. 



8.4 LIST USER FILE DIRECTORY (CATFIL ) 

The CATFIL utility lists all files in the User File Directory for a specified 
<userid>. It also tabulates all pertinent information for each file. 

8.4. 1 STANDARD JCL PROCEDURE 

The following JCL is a standard procedure for List User File Directory 
CATFIL: 

,» CREATE CATFIL, COMMENT, "LIST FILES UNDER A USER " 

/REPLACE CATFIL . LIST FILES UNDER A USER . 

/EXEC 0BJ«(1, SYSTEM, CATFIL) MEM«(300, 1850,670) PRTY«(1,5)> 

/ PRIV TIME«-1 PRTYI'PRI 

/ASSIGN SC DEVlCEl«DCON SH A REl»SC0N .CONTROL 

/ASSIGN 6 SC DEVICEI«DLST FlLEl«FLST SHAREl-SLST BUFFERS*! .FILE LISTING 

/END 



8. 4. 2 MEMORY PARTITION REQUIREMENTS 

The job area required to run CATFIL must only be large enough to contain 
the load module since CATFIL requires no work space. Sufficient job area 
is 1850 words; sufficient job extension area is 670 words. 
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8.4.3 LUN ASSIGNMENTS 

The logical unit assignments needed for CATFIL are listed in table 8-6. 

Table 8-6. CATFIL Logical Unit Assignments 



LUN 


Description 


Comments 



6 


Message and control 
Listing of files 


Any input/output device 
Any printing device or a file 



8.4.4 OPERATION 

CATFIL is a single task program that runs under DX980 in the privileged 
mode. Since it accesses portions of the system that are user inaccessible, 
it is necessary to link the CATFIL modules with the system external defini- 
tion file (SYSTEM, DXEXTD). 

The program, CATFIL, may be run from the system console or from the 
Batch Processing or Interactive Terminal Subsystems. When run from other 
than the system console the printout of the password for each file is sup- 
pressed. CATFIL types the following request on the message and control 
device (LUN 0): 

USERID = 

The user responds with a 1 to 6 character identifier for the <userid> of the 
User File Directory to be listed. The utility then requests the volume num- 
ber (i. e. disc drive number) of the disc containing the User File Directory: 

DISC VOLUME ID = 

The user may respond by entering a specific integer value from 1 to 20 fol- 
lowed by a carriage return, or by invoking the default volume number of 1 
by selecting carriage return only. The utility then prints the date and time 
of request, and an alphabetically ordered list of all files within the selected 
User File Directory on LUN 6. The information provided by CATFIL for 
each file is as follows: 

• File Name - 1 to 6 alphanumeric characters identifying the file. 

• Disc Address - hexadecimal track address of initial track allocated 
to the file. 

» Password - to 4 alphanumeric characters identifying the password 
for the file. If CATFIL has been invoked from other than the sys- 
tem console any passwords for files will be replaced with asterisks. 



Change 1 



8-9 



Digital Systems Division 




943005-9701 



• Integrity code - four alphabetic file access codes in the form X,, 

X_, X_, X. where 
2 3 4 

X, = read access code 

X2 = write access code 

Xg = delete access code 

X4 = execute access code 

In general X^ can be: 

N = No one can access the file. 

C = The creator can access the file. 

P = The user having the correct password can access the file. 

A = Anyone can access the file. 

• Current File Size = Number of tracks currently allocated to the file. 
If the file is completely full, this current file size exceeds the maxi- 
mum file size by 1 track for linked sequential and key indexed files 
only. 

• Maximum File Size - Maximum number of tracks that may be allo- 
cated to the file. One additional track may be allocated to a file at 
the time the file becomes full. 

• File Type - Indicates the type of file from the three supported types; 
linked sequential, relative record, and key indexed. 

• Logical Record/Key Length - Number of characters in the fixed 
length logical record for relative record files. Number of charac- 
ters in the key for key indexed files. 

• Physical Record Length - Number of words in the physical record 
for any type file. This establishes the length of the system acces- 
sible buffers used for input/output to the file. 

In addition to this tabular data for each file within the User File Directory, 
CATFIL prints the following information for the specified User ID: 

• The number of files 

• The number of tracks allocated 

8.4.5 ERROR CODES 

The possible error/termination messages printed by CATFIL to LUN are 
listed in table 8-7. 
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Table 8-7. CATFIL Termination Messages 



Message 


Definition 


NORMAL TERMINATION 
INVALID DEVICE ID 

tt t rrr-.Ai ttctt , 'd m 

DISC OFF LINE 
BAD NUM 

UNDEFINED USER ID 


Process executed correctly 

Device ID is not in the Physical Device 
Table List 

0«" TTVTDTTT f^^™ 4-1, ~ r'rMVTCrM XT' TT„~,. TH l~ 

V>Jli XJ.M U J. 11 Ulll UX.LG \J\/1>IU\/U1^- V^l O CJ. JLJ--' J. o 

greater than 6 characters OR first charac- 
ter is not a letter 

Input from the console - not a valid deci- 
mal integer 

User ID not found in the Master File Direc- 
tory 



8.5 DX980 OVERLAY LINK EDITOR (DXOLE ) 

The DX980 Overlay Link Editor (DXOLE) must be used to format input object 
records into a load module for execution under DX980. Three program 
structures are allowed: 

1. A memory resident program with no overlays 

2. An overlay structure defined at link edit time (preplanned overlay) 

3. An overlay structure that is dynamic and can change during execu- 
tion (unplanned overlay) . 

DXOLE functions in three different modes to allow maximum flexibility to 
the user. These modes are: 

• Compact Mode - The Compact mode combines object modules to 
create new object modules. All references for defined symbols be- 
tween the object modules are resolved. All references to entry 
points not found in the object modules are left unresolved. The ob- 
ject module produced is relinkable. The new object module defines 
all the entry points defined in the linked modules as entry points 
and contains references to the unresolved entry points. 

• Normal Mode - The Normal mode combines one or more object 
modules to create a load module for execution* This mode is the 
default mode for the link editor. The load module created may or 
may not contain an overlay structure, depending upon parameters 
supplied by the user. The Normal mode can produce an External 
Definition File. This file contains the symbol names and addresses 
of the entry points defined in the root segment of the created load 
module. 
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• Subsystem Mode - The Subsystem mode combines one or more ob- 
ject modules to create a load module containing a subsystem for 
execution. This load module may contain a preplanned overlay, but 
cannot contain an unplanned overlay. Subsystems execute as abso- 
lute programs. Therefore, they can address into the root segment 
of the operating system. In the Subsystem mode an External Defini- 
tion File produced during a previous Normal mode link of the oper- 
ating system resolves external references. 

8. 5. 1 STANDARD JCL PROCEDURE 

The following JCL listing is a standard procedure for DXOLE: 

/REPLACE DXOLE . LINK EDITOR '. 

/EXEC 0BJ»(1, SYSTEM, DXOLE) MEM«(300. 12000.2000) PRTY»*f 1.15>| 

/ TIME«-1 HEMj«MEM PRTYj»PRI TIME|«TIM 

/ASSIGN 1 DUMMY DEVICEt-DOBl FILE|«F0B1 BUFFERS-2 '. ALT 1 OBJECT IN 

/ASSIGN 2 DUMMY DEVICE»«D0B2 FILE|«F0B2 BUFFER8«2 ' ALT 2 OBJECT IN 

/ASSIGN 5 DISCI DEVICEt«DIN FlLEifFIN BUFFERS-1 , PRIMARY INPUT/CON 

/ASSIGN 6 SC DEVICEI»DLST , LOADMAP LIST/ERR 

/ASSIGN 7 DUMMY DEVICEl»D0BJ FILE|«F0BJ BUFFERS»1 . COMPACT OBJ OUT 

/ASSIGN 8 DISCI DEVICEt«DLM FlLEi«FLM REPLACEt'RLMf 

/ BUFFERS*! RELREC ACCES3«(ANY.CREAT.CREAT,ANY) I 

/ ACCESSt«CLM ALL0CATE«(1. 0.32,1) ALLOCATE!*! LMf 

/ LRECL«64 '. LOAD MOD OUTPUT 

/ASSIGN 9 DISCI FILE«(SY3TEM,USRFTN) DEVICEl«DLIB| 

/ FILEl«FLIB BUFFERS-2 _ . LIBRARY FILE 

/ASSIGN 10 DISCI FILE»(TEMP.SCRL) NEW BUFFERS-1 LINKSFQI 

/ ACCESS»(ANY,ANY.ANY,ANY) ALLOCATE«<10, 300, ?56,30) ' LINKSEQ SCRATCH 

/ASSIGN U DISCI FILE-CSYSTEM.DXEXTD) FILEl»FEXT BUFFER8»1 . SYS EXT DEF8 OPT 

/ASSIGN 13 DISCI FILE»(TEMP.SCRR) NEW BUFFERS»1 RELRECl 

/ ACCESS»(ANY,ANY,ANY,ANY) ALLOCATEM10, 300, 1 28,10)1 

/ LRECL-100 1 RELREC SCRATCH 

/END 

8. 5. 2 MEMORY PARTITION REQUIREMENTS 

DXOLE memory requirements- for linking an average program are defined 
with the following expression: 

MEM=(300, 12000, 2000) 

DXOLE is an overlay program with variable memory requirements. 

DXOLE requires 7950 words of program space plus a 2000 word Job Exten- 
sion Area (<jearea>). A variable amount of table space is required depend- 
ing upon the number of references, definitions, overlays, and identifications 
in the input object decks. The memory requirements do not depend upon the 
size of the load module being produced. The following guidelines aid in de- 
termining the size of the variable tables: 

• 17 words per overlay to be generated 

• 12 words per DEF 

• 12 words for the first REF and 3 words for each subsequent REF 
to a label 
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9 words per common definition 

3 words per common reference 

13 words per object module 

5 words per OBJNAM parameter (unplanned overlays) 

3 words per Library LUN specified 

O E* "» T 

O, O a O -L 

Table 8-8 provides a summary of the LUN assignment requirements for 
DXOLE as a function of mode. As can be seen in the table, not all assign- 
ments are required for each mode. In addition to these standard LUN's any 
other LUN's can be assigned to DXOLE and accessed by means of Include, 
Search, and Library commands. 

8.5.4 OPERATION 

DXOLE allows two different overlay structures, preplanned and unplanned. 
Each structure has advantages and the user should decide which, if any, 
overlay technique to use. The control cards describe the program structure 
to DXOLE. 

8, 5.4, 1 PREPLANNED OVERLAYS, A program that is link edited in the 
Normal mode or Subsystem mode with the overlay (OVLY) option is called a 
preplanned overlay. The programmer describes the overlay structures for 
the program with the Root and Segment control cards. During execution of a 
preplanned overlay structure, a Runtime Overlay Manager (OLM$#$) loads 
all overlays into memory. The link editor includes the overlay manager as 
part of the root segment. The Runtime Overlay Manager determines the re- 
lationships between overlay segments and the load addresses of the overlays 
by inspecting overlay transfer vectors built by the link editor. These run- 
time vectors, called the Overlay Segment Vector (OSV$#$) and Overlay 
Transfer Vector (OTV$#$), are also included in the root segment of the load 
module produced. 

The link editor uses the call- by-name technique for loading overlays in a 
preplanned overlay structure. The user program references the name of 
the definition resolved in the next level of the overlay. The overlay manager 
then loads the overlay and transfers control to the desired entry point. The 
overlay is only loaded when necessary. Following calls to the same overlay 
will not reload the overlay unless it has been replaced in memory by another 
overlay at the same overlay level. The overlay manager uses the S and X 
registers and does not preserve their values. The calling program must 
save these registers if the contents should not be destroyed. On the pre- 
planned overlay load map all forward references in the overlay are identified 
by the message "#*OTV**". The address associated with the reference on 
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Table 8-8. DXOLE Logical Unit Assignment 



oo 



4^ 



CD 

in 

"♦ 
co 

3 

CO 

^" 
5' 
o' 

3 



LUN 


Description 


Comments 


Mode Requirement 


Compact 


Normal 


Subsystem 


5 


Primary input 


Sequential input device/ file with 80 
character record length. Input control 
commands and object modules may be 
intermixed. 


X 


X 


X 


6 


Diagnostics and Memory Maps 


Sequential output device/ file with 80 
character record length. 


X 


X 


X 


7 


Object Module Output 


Sequential output device/file with 80 
character record length. 


X 






8 


Load Module Output File 


Relative record file with 64 character 
record length. 




X 


X 


9 


Subroutine Library File 


Dummy or key indexed file with 80 
character record length and 8 character 
key length. This file should be built 
using the Library Builder (LIBBLD) 
utility. 


X 


X 


X 


10 


Intermediate Scratch File 


Rewindable device or linked sequential 
file with 80 character record length. 


X 


X 


X 


11 


External Definition Input File 


Linked sequential file with 8 character 
record length. This file contains the 
external definition table for the cur- 
rently running versions of the operating 
system produced under the Normal 
mode during a previous link edit of the 
operating system. 


X 




X 


12 


External Definition Output File 


Linked sequential file with 8 character 
record length. 




x 




13 


Intermediate Scratch File 


Relative record file with 100 character 
record length. 


X 


x 


X 


any 
unused 


Alternate Input 


Accessed with Include control command 


X j> 


X (> 


x 


any 
unused 


Alternate Library File 


Accessed with Library control command 


x 


X [> 


x 



NOTES: 
1 



The External Definition Output File is not required for any mode, but is optional for the Normal mode. It is assigned 
only when an external definition table is to be produced. 

Optional alternate LUN. 




943005-9701 



the load map points to a table entry that the Overlay Manager will use to load 
the overlay. External references in the overlays are resolved in the follow- 
ing manner, 

1) A reference to a label defined in the same overlay is resolved as the 
address of the label. 

2) A reference to a label defined in a lower level overlay which is in 
the path of this overlay is resolved as the address of the label. 

3) A reference to a label which is defined in the next overlay level is 
resolved as an address in the Overlay Transfer Vector. At runtime 
the entries in the Overlay Transfer Vector are managed by the 
Overlay Manager. When an overlay is currently in memory, the 
Overlay Transfer Vector causes control to pass directly to the over- 
lay. When an overlay is not in memory, the Overlay Transfer Vec- 
tor causes control to transfer to the Overlay Manager to load the 
overlay and then transfer control to the overlay. Forward data ref- 
erences may not be used. 

4) No forward references can be made to definitions more than one 
overlay level away. Any such reference is marked as undefined 
("##UN-DEF*#" on the load map) and is assigned the absolute value 
FFFF 16 . 

8. 5.4.2 UNPLANNED OVERLAYS. An unplanned overlay is a program that 
is link edited in the Normal mode with the No Overlay (NOVLY) option and that 
defines overlays with Object control cards. The programmer describes the 
overlay structure with the Root and Object control cards. The overlay is 
called an unplanned overlay since the location of the overlay in memory is 
not specified when the link edit is performed. During execution the overlay 
is loaded using the load and relocate SVC. DXOLE does not include a Run- 
time Overlay Manager as part of the load module. The second parameter of 
the Object control card defines a name. This name can be an external ref- 
erence in the root or any overlay, and is resolved as the overlay number. 
The link editor does not resolve any other references between overlays. The 
order for resolving external references is: 

1) A reference to a label defined in the same overlay is resolved as 
the address of the label. 

2) A reference in an overlay to a label defined in the root is resolved 
as the address of the label. 

3) A reference having the same name as the second parameter of the 
Object control card is resolved as the overlay number. These items 
are identified on the load map by the message, **MIP**. 
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4) No references can be made to definitions in any overlay. Any such 
reference is unresolved and is flagged as "**UN-DEF**" on the load 
map. Hexadecimal FFFF is assigned as the value of the unresolved 
reference. 

8. 5. 4. 3 CONTROL CARDS. Figure 8-1 illustrates the format of the three 
DXOLE control cards (Type I, Type II and Type III). Control cards must 
have a blank in column one, a card name starting in column two and one or 
more blanks preceding the first argument. Commas separate each argument. 
The argument list cannot contain imbedded blanks. Arguments may be speci- 
fied up to and including column 72. Comments can be placed on the control 
cards following the first blank after the last argument specified. These con- 
trol cards relate three kinds of information to the link editor: 

• The mode of the link edit to produce either a relinkable object mod- 
ule or a load module. 

• The relationship between the memory image phases in the load mod- 
ule. 

• The input LUNs for the object modules to be included with each 
Type II control card. 

Table 8-9 indicates the Type II and Type III cards that are valid for each 
Type I control card and its options. Figure 8-2 shows a sample control deck 
and a block diagram of the associated program. 



TYPE I: 

a) COMPACT 

b) NORMAL 

c) SUBSYSTEM 

TYPE II: i 

OBJECT 

ROOT 

SEGMENT 



[ PAGE (p 1 
NO PAGE J 

[nextd q fl fi 

[EXTD J [7 

[ NOVL/ 
OVLY 



NOVLY <D 
OVLY 



*][• 



MAXENT 



■1 I", MAXENT=n 1 ©1 |\ MAXSEG=n 2 ®\ fPAGE (pi 
= n i ©] [.MAXSEG=n 2 ®] [f^gr] 



IDTNAM, OBJNAM 
IDT NAM 
LEVEL 



[, HEXCON] 



TYPE III: 

SEARCH 

INCLUDE 

LIBRARY 



l,2(Keyl,Key2, 
l,2(Keyl,-Key2, 
20,21,22 



,Key ),3 
n 

.Key ),3 
n 



Default option 
© Default = 44 
© Default = 22 



Figure 8- 1. Control Card Formats 
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ard Sequence 


i and Options 






Type I 
Control Card 


Valid Type II Cards 


Valid Type III Cards 


Object 


Root 


Segment 


Object 
Deck 


Search 


Include 


Library 


Compact 


x p 






X 


X 


X 


X 


Normal 
No Overlay- 


X 


X 




X 


X 


X 


X 


Normal 
With Overlay- 




X g> 


X 


X 


X 


X 


X 


Subsystem 
No Overlay 




x 




X 


X 


X 


X 


Subsystem 
With Overlay 




x 


X 


X 


X 


X 


X 




o 
o 

I 

o 



Note: 



1. Required card 
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ROOT SEGMENT 



MIP 1 
El ,E2 



MIP 
El 



MIP 5 
El ,E2 



MIP 10 
Et ,E2 ,E3 



MIP 8 
El ,E2 



MIP 9 
El ,E2 



I NORMAL OVLY , 

MAXSEG-10 
II ROOT IDT1 

f x 1700' IDT1 
III V 1 , OBJECT DECK 

11706 

INCLUDE 16(S0) 
LIBRARY 17,18 
II SEGMENT 1 

III INCLUDE 16(S1) 

II SEGMENT 2 

f1700 1DTX 
III < ! 

11706 

SEARCH 18(KEY1) 
II SEGMENT 3 

III INCLUDE 16(S3) 

II SEGMENT 3 

/170O 
III < ) 

U706 

LIBRARY 17 
II SEGMENT 2 

III INCLUDE 16(S5,S4),1 7(S$ 5) 

II SEGMENT 1 ' 

M700 
III < 1 

U706 
II SEGMENT 2 
HI INCLUDE 18(S7) 

II SEGMENT 3 

III INCLUDE 16{S8) 

II SEGMENT 3 

III INCLUDE 9 (QQCOSINE) 

SEARCH 17 
II SEGMENT 2 

M700 
III 1 ) 

11706 



(A)1301 lO 



Figure 8-2. Overlay Structure and Control Deck 

Type I Control Cards . A Type I control card is optional. If present it must 
be the first control card. The Compact card directs DXOLE to link object 
decks together to create new relinkable object decks. The only valid param- 
eter for this mode is to specify the load map use page ejects or double spac- 
ing (PAGE and NOPAGE, respectively). This Normal control card directs 
DXOLE to create a load module for execution. If no Type I card is specified, 
the Normal mode is the default Type I control card. Four optional parame- 
ters may be specified on this card. The NEXTD/EXTD parameter specifies 
production (EXTD) or no production (NEXTD) of an External Definition File. 
The External Definition File is a sequential file that contains the names and 
addresses of all the definition statements in the root segment of the object 
to be linked. This file then links subsystems to the operating system root 
segment. The NOVLY/OVLY parameter specifies production (OVLY) or no 
production (NOVLY) of a preplanned overlay structure. If this parameter is 
not present no overlay will be produced. The MAXENT and MAXSEG param- 
eters specify the maximum numbers of forward references in the overlay 
structure and the maximum number of overlays, respectively. The Subsys- 
tem control card also directs DXOLE to create a load module for execution. 
The arguments valid for Subsystem cards have the same meaning as for the 
Normal card. The Normal and the Subsystem modes handle the External 
Definition File differently. The Subsystem mode automatically references 
the EXTD and creates definition entries for all the names in the EXTD. This 
allows privileged programs to use subroutines that are part of the root of 
the operating system. 
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Type II Control Cards. A Type II control card is required unless the pro- 
gram to be linked is a nonoverlaid and nonprivileged program, For this ex- 
ception, DXOLE will take the program entry point from the first object deck 
in the root segment, This default condition allows the control input of 
DXOLE (LUN 5) to be assigned directly to a linked sequential file output from 
the 980 Assembler or FORTRAN compiler. For all other DXOLE modes at 
least one control card is required. In the Compact mode an Object card is 
required. In the Normal and Subsystem modes a Root card is required. 
Segment cards can also be specified for the OVLY option and Object cards 
for the NOVLY option. 

A special comment is necessary to explain the specification of a FORTRAN 
main program as the entry point in the DXOLE output, DXOLE uses blanks 
as delimiters between the control card type (i.e., Normal, Root, Include) 
and the arguments. This convention makes the specification of 1 #MAIN]6' 
(The FORTRAN main program IDT) impossible. Therefore, DXOLE handles 
the name 'MAIN' as a reserved word. The IDT specification of 'MAIN' on 
either the Root card or the Object card as the object deck with the entry point 
is interpreted by DXOLE to be any one of the following names: 

1. 16MAIN# - The FORTRAN main program name. 

2. ****** _ The default IDT name assigned to assembler output 

decks 

^ ■» r a t tv t mi _ _ _i e _ 1 j _ t t-\ m - _ • _i j _ __ _ i • i t t i <1 

.3. iYLrt.±iN. - me aeiauit ilii name assigned to an ODject aecK Dy me 
PL/EXUS compiler. 

In the Compact mode the Object card has two arguments. The first argu- 
ment is IDTNAM. This argument is the name of the object deck which has 
an end vector to be used to define the control entry point of the linked object 
deck. The second parameter is OBJNAM. This argument is the name to 
assign to the new linked object deck. No other arguments are valid. 

Multiple compact mode object decks can be output by entering multiple object 
control cards. The object decks are output to LUN 7 and terminated with a 
single end of file. 

In the Normal and Subsystem modes the Root card defines the memory resi- 
dent code. Segment and Object cards define preplanned and unplanned over- 
lays, respectively. The Root card has one argument, IDTNAM. This argu- 
ment specifies the name of the object deck which has an end vector to be used 
to define the control entry point in the root segment of the load module. The 
Segment card has 1 argument, the level number. This argument defines the 
overlay's relationship to the other overlays and the root. The root is at 
level of the overlay. The first level below the root is level 1, the next 
logical level is level 2 and so forth. Level numbers must be sequential. An 
Object card also defines an overlay. However, all Object overlays are at 
level 1. The Object card is valid only for the unplanned overlays (NOVLY 
option). The first parameter of the card, IDTNAM, identifies the object 
deck which has an end vector to be used to define the control entry point for 



Change 1 8-19 Digital Systems Division 




943005-9701 



this overlay. The second required parameter, OBJNAM, associates a 
name with the overlay being created. This parameter is entered in the 
symbol table of DXOLE with a value equal to the overlay number (i.e. 1 for 
the first, 2 for second, etc.). This entry name may be referenced from any 
other segment and is resolved by DXOLE as the overlay number. The third 
parameter, HEXCON, is optional. If specified, this parameter indicates the 
load address of the newly created overlay. 

Type III Control Cards. Type III control cards specify input LUNs. The 
link editor uses the LUNs to obtain the object programs to be included. Type 
III cards follow the Type II card defining the beginning of a root or overlay, 
and precede the Type II card that defines the beginning of the next overlay. 

The Search and Include cards have identical formats. Both have one or more 
parameters. Each parameter is either a LUN or a LUN followed by one or 
more indexed record keys grouped inside parentheses. Specified keys are 
evaluated as an USASCII string. Keys are limited to a maximum of 8 char- 
acters. Keys of less than 8 characters are extended on the right with blank 
characters. LUNs accessed with keys must be assigned to an indexed file. 
The Include card identifies particular object modules which DXOLE includes 
in the output phase being created. Search cards identify object modules to 
be searched for a definition that resolves an undefined reference in the same 
phase. Only those modules that resolve external references are included. 
Search and Include cards are processed when encountered in the input stream 
and are scanned from left to right. If the LUNs do not have keys, the link 
editor processes object modules until it finds an end of file. If a key is speci- 
fied, the link editor processes all object modules until it finds an end of file 
or another keyed record. DXOLE processes object modules in the input 
stream as if they were specified by an Include statement. The object module 
is included in the output phase regardless of whether it resolves external ref- 
erences. A keyname of '#MAINj6' cannot be specified because DXOLE does 
not allow imbedded blanks within the list of keys. To include a FORTRAN 
main program, specify a keyname of 'MAIN'. 'MAIN' will be interpreted as 
'tfMAINtf' for this program. 

The Library card can only specify LUNs. Each LUN must have been as- 
signed to an indexed file which has been formatted like the system library. 
The link editor does not search libraries until it processes all other Type 
III control cards. DXOLE then searches the indexed file(s) in the order 
specified by the Library card before searching the system library file. The 
system library, LUN9, is not accessed in the Compact mode unless explit- 
icly specified on a Library control card. 

8. 5. 4. 4 USING DXOLE "WITH BATCH INPUT READER. Executing DXOLE 
under Batch Input Reader (BIR) requires careful preparation of the input 
stream if LUNs other than LUN 5 are assigned to the card reader. When 
DXOLE processes an Include or Search card, the referenced LUN is opened 
and read until an end of file is found. The input stream for DXOLE must be 
structured as shown on the following page. 
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ROOT 
1700 



IDT1 
IDT1 



1706 

INCLUDE 

1700 



17 
IDT2 



1706 
1700 



IDT3 



1706 
/* 

SEARCH 1! 
/* 



End of file for LUN 17 



End of file for input stream LUN 5 



The included file is physically defined inside the data for LUN 5. When 
DXOLE encounters the Include for LUN 17, it opens and reads the file. 
When the end of file is found, LUN 17 is closed and the next control card is 

read from LUN 5. This sfnirhir a alco iirn-f-Vo -PV^x fV.^ "n->4-„-U T, *. c i_„ 

" ~ " ^" ~ •—-"'>■» Yr^iiVt. J.VJ. HiV, JLJCfcUV^lJ. J.lipU.1- OJJVJVJJ.CI." 

(BIS). However, a more conventional input stream for BIS is as follows: 

//DATA 5 

ROOT IDT1 

1700 IDT1 



1706 

INCLUDE 17 

SEARCH 18 
/* 

//DATA 17 

1700 IDT2 



End of file for LUN 5 



1706 
1700 



1706 



/* 



End of file for LUN 17 
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8. 5. 5 ERROR CODES 

Table 8- 10 lists the error codes and their corresponding meanings for the 
DXOLE utility. 

Table 8- 10. DXOLE Error Messages 



Error Number 



1 

2 

3 

4 

5 

6 

7 

8 

9 

10 

11 

12 

13 

15 

16 

17 

21 

24 

25 

26 

27 

28 

30 

31 

32 

34 

35 

36 

37 

38 

39 
40 

41 



Message 



Missing Type 1 Control Card 

Improper Control Card Format 

Unidentifiable Control Card 

Maximum Number of Entries Exceeded 

Invalid Control Card Argument 

Unexpected End Of File On LUN 

Missing Type 2 Control Card 

Invalid Control Card For DXOLE Mode 

Multiply Defined Root Segment 

Missing Argument Following Delimeter 

Too Many Arguments 

Undefined Program Name 

Invalid Delimiter 

Invalid LUN 

Invalid Key 

Missing 1700 Object Record 

Level Number Not Sequential In Overlay 

Maximum Number Of Segments Exceeded 

Maximum Number Of Entries Too Large 

Invalid Number Specified 

Numeric Overflow > 16 Bit Signed Number 

Missing Root Segment 

Multiply Defined Name 

Invalid Level Number 

Table Requirements Exceeded Available Memory 

Object Decks Must Be Relocatable 

Unidentifiable Object Record 

Checksum Error 

Missing 1706 Object Record 

Common or External Reference Not Defined 

Before Referenced 

File Organization Does Not Allow Keyed Access 

Library File Not Properly Structured 

Block Data STMTS Must Be In MIP Defining the 

Common 
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8. 5. 6 INPUT FORMAT 

The following paragraphs describe the structure and format for input ac- 
cessed by DXOLE. Refer to the description of the JCL translator in this 
section of the manual for the structures of: 

• Library files 

• Data sets 

.n the iiies 



8. 5. 6. 1 DATA SET STRUCTURE FOR SEARCH AND INCLUDE. LUNs 
referenced by Search and Include commands can be accessed either sequen- 
tially or randomly. The user specifies the access method by supplying either 
a LUN only, or a LUN and a key. When supplied with a LUN only, DXOLE 
processes the LUN sequentially until it finds an end of file. Data sets or de- 
vices assigned to these LUN's must allow sequential access of data. All 
records read from that LUN must be in DXOLE input object format. By 
specifying a LUN number and the value of a key, the user can specify pro- 
cessing of any part of a key indexed file. (The LPFBLD utility can be used 
to build a key indexed file with keynames equal to the object deck IDTNAM.) 
The key is an index for positioning to the first record to be read. Process- 
ing is complete when DXOLE encounters either an end of file or another rec- 
ord with a kev. The kev lengths are restricted to p.io-ht: rKararfprs Tf 1^<= C 
than eight characters are specified, the editor adds USASCII blanks on the 
right of the key to make eight characters. The physical structure of the data 
set is as follows: 

Record 
Keys Data Associated with Key (Object Record) 

PGMOlb 1700 PGM01 
1702 



1706 
TABLED 1700 TABLE 

1706 

To include object modules from this data set, the programmer specifies the 
name of the program(s) to be accessed. For example: 

INCLUDE 1 (TABLE, PGM01) 

A key indexed file with this structure can also be accessed without specifying 
a key since DX980 file management allows sequential access of records for 
key indexed files. 
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8. 5. 6. 2 LIBRARY AND SYSTEM LIBRARY STRUCTURE. DXOLE assumes 
that LUN 9 has been assigned to either a dummy file or a key indexed file that 
was created with the DX980 library builder (LIBBLD) utility program. If as- 
signed to DUMMY, no processing other than syntax checking occurs. If as- 
signed to a library file, that file has the characteristics described in the fol- 
lowing paragraphs. 

Library files must reside on disc and must be in the following format: 



Record Ke 



I 



QQSINE 



Data Associated with Key 



1700 SINE 
1702 SIND 
1702 SINE 
1702 ARCSIN 



Records defining 
entry points. 



SIND 
SINE 
ARCSIN 
QQCOSINE 



1706 
QQSINE 
QQSINE 
QQSINE 
1700 COSINE 
1702 DCOS 
1702 COSINE 
1702 ARCCOS 



DCOS 

COSINE 

ARCCOS 



1706 

QQCOSINE 
QQCOSINE 
QQCOSINE 



The 1700 object record of all programs in the library have a key equal to the 
characters 'QQ' concatenated with the identification name of the program. 
All other object records for this object deck are sequentially linked to the 
keyed 1700 record. The utility program that creates the library also makes 
a key equal to each entry point in the object module (i. e. , SINE, SIND, 
ARCSIN for object deck SINE). The data associated with each key is another 
key that positions the file at the 1700 object record of the program defining 
the entry point. DXOLE accesses all library files in the following manner 
for each unresolved external reference: 

(1) The name of the symbol referenced is used as a key to read the 
library. 

(2) If the key does not exist, the symbol is not defined by any object 
module in the library. 
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(3) If the key exists, the first 8 characters of the record returned are 
used as the key of a second read operation. 

(4) The data returned with the second read must be the 1700 object rec- 
ord of the module defining the external reference. Also, the second 
key must exist or the library is improperly structured. 

(5) Processing of the object module terminates with the 1706 record. 

Library files may also be referenced with Search and Include control cards 
by specifying the key that positions the file at the 1700 record. That is, the 
letters 'QQ' followed by the identification name of the program to be ac- 
cessed: 

INCLUDE 9(QQSINE, QQCOSINE) 

A library file must have a key specified if accessed with an Include or Search 
card since some of the records contain keys rather than object records. 
Using an Include on a library might be necessary if the order of the object 
modules in the load module is important. Otherwise, normal library pro- 
cessing at the end of a program segment will include those program neces- 
sary to define external references. 

8. 5. 6. 3 OBJECT RECORD FORMAT. DXOLE accepts object from linked 
sequential files, key indexed files, and devices. Several different data set 
organizations are allowed. The DXOLE control cards describe the organiza- 
tion of the data set and therefore the processing method used. All input data 
sets must define at least one object module. Seven standard object records 
are used by all object modules. These object records are illustrated in fig- 
ure 8-3. Note that each record contains 32 words. All numbers are hexa- 
decimal, and the object records are independent of the object media. The 
first word of each record specifies the record type (0-6). The last word in 
each record is a checksum, which is the two's complement of the sum of the 
first 3 1 words. 

Identification Record. The identification record contains the program name 
which may be specified, for example, in an IDT assembler directive. If the 
program name is greater than six characters, it is truncated; if it is less 
than six characters, trailing blanks are inserted. Leading zeros are in- 
serted in the format code. 

Common Symbols. Each record of common symbols contains a maximum of 
seven symbols. Each symbol contains six characters, and trailing blanks 
are inserted as required. A stop code is required following the last symbol 
in each record. 

Entry Points. Each record of entry points contains a maximum of seven 
entries as indicated, for example, by a DEF assembler directive. 
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IDENTIFICATION 



COMMON SYMBOLS 



FORMAT COOES 
5=RELOCATABLE OBJECT 



PRNAME IS THE 

PROGRAM NAME 

IN ASCII CHARACTERS 



CHARACTERS 60 AND 61 |60 
ARE RESERVED. 




UP TO SEVEN ENTRY POINT 
SYMBOLS ARE CONTAINED 
WITHIN A RECORD 



ENTRY POINTS 



A STOP CODE 0030i6 IS 
INSERTED FOLLOWING 
THE LAST ENTRY POINT 
ADDRESS TO INDICATE 
THE END OF DATA WITHIN 
A RECORD 



CHARACTERS 60 AND 61 
ARE RESERVED 



17 


i 02 


3 N 


3 A 


4 M 


5 E 


6 


7 1 


8 

ENTRY PON 


9 

rr ADDRESS 


io N 


" A 


12 M 


13 E 


14 


15 2 


ie 

ENTRY POI 


17 

IT ADDRESS 


18 00 


19 30 


3b 


^"^1 


22 ^ 









ENTRY POINT 
SYMBOL NO. 1 



ENTRY POINT 
SYMBOL NO. 2 



CHECKSUM 








17 


' 01 






2 


N 


3 A 






4 


M 


5 E 


} SYMBOL 
I NO 1 




6 


f) 


7 b 






8 


|9 
LENGTH 




A STOP CODE 003016 >S 


10 


n 


/ COMMON 


INSERTED FOLLOWING 
THE LAST SYMBOL LENGTH 


12 


13 


} SYMBOL 
I NO 2 


TO INDICATE THE LAST 
COMMON SYMBOL ENTRY 


14 


15 




WITHIN A RECORD. 


16 


17 

LENGTH 






18 


19 


[ COMMON 
) SYMBOL 
I NO. 3 




20 


21 




22 


23 




24 


25 
LENGTH 


\ 




26 


27 


f COMMON 




28 


29 


> SYMBOL 
1 NO. 4 




30 


31 






32 


33 

LENGTH 






34 


35 


[ COMMON 
) SYMBOL 
I NO. 5 




36 


37 




38 


39 




40 


41 

LENGTH 






42 


43 


/ COMMON 
) SYMBOL 
1 NO. 6 




44 


45 




46 


47 




48 


He 
LENGTH 






50 


51 






52 


53 


SYMBOL 
NO. 7 




54 


55 






56 

LEFi 


57 
GTH 






58 


00 


59 30 




CHARACTERS 60-61 
ARE RESERVED 


80 


61 






62 

CHE( 


163 

:ksum 





(A)130394 (1/2) 



Figure 8-3. Object Records (Sheet 1 of 2) 
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EXTERNAL REFERENCES 






17 


i 03 


2 


N 


3 


A 


4 


M 


5 


E 


6 





7 1 


8 


00 


9 


00 


10 


N 


11 


A 


12 


M 


13 


E 


14 





15 


2 


16 


00 


17 


00 


18 


00 


19 


30 


20 




21 





EXTERNAL 
REFERENCE 

NO.I 



EXTERNAL 

REFERNANCE 

N0.2 



VARIABLE 
LENGTH DATA 
(ITEMS CAN BE 
1 TO 3 WORDS'). 




A STOP CODE 003016 IS 
INSERTED FOLLOWING 
THE LAST EXTERNAL 
REFERENCE TO INDICATE 
THE END OF DATA 
WITHIN A RECORD. 

UP TO SEVEN EXTERNAL 
REFERENCES CAN BE 
CONTAINED WITHIN A 
RECORD. 

CHARACTERS 60 AND 81 
ARE RESERVED. 




ADDRESS OF FIRST ITEM AFTER THIS WORD. 



RELOCATION MAP 



ITEM 
1 


ITEM 
2 


ITEM 
3 


ITEM 

4 





_J I L_ 



WORD. ABSOLUTE 

1 WORD. COMMON 

1 WORD. RELOCATABLE 

i 1 WORD. EXT. REFERENCE 

1 BYTE. ABSOLUTE 
1 1 BYTE. COMMON 

1 1 BYTE. RELOCATABLE 

1 1 1 BYTE. EXT. REFERENCE 



1' LOAD ADDRESS INCLUDED 



LOAO ADDRESS 



BLOCK DATA 



> NO LOAD ADDRESS 




BLOCK DATA RECORDS 
ARE OUTPUT BY THE 
FORTRAN COMPILER. 



VARIABLE LENGTH. <4 
DATA WORDS (MAY NOT 
EXTEND BEYOND THE END 
OF THE RECORD) 



A MINUS ONE IS INSERTED 
TO INDICATE THE END OF 
DATA WITHIN A RECORD. 



(A)1 30394 (2/2) 




X-0 FOR NO VECTOR 
X-1 USE ENTRY ADDRESS 
AS END VECTOR. 



Figure 8-3. Object Records (Sheet 2 of 2) 
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External Reference Points. Each record of external reference points con- 
tains a maximum of seven references as specified, for example, by a REF 
assembler directive. 

Text Records . All text records include an item count between 1 and 22 for 
the current record. Each item is between one and three words long, and all 
words in an item are contained within one text record. The number of object 
record words per item in memory, and the relocation character printed in 
the first column of an assembly listing appear in table 8-11. The final relo- 
cation map in each record applies only to items within the current record, 
not to any items in the next record. 

Table 8- 11. Text Record Parameters 





Assembly 


Words per 


Words per 


Item Type in Relocation Map 


Listing 


Item in 


Item in 




Character 


Memory 


Text Record 


000 - Absolute word 


(Blank) 


1 


1 


00 1 - Common word 


C 


1 


2 


10 - Relocatable word 


P 


1 


1 


011 - External reference word 


X 


1 


2 


100 - Absolute byte 


(Blank) 


2 


2 


101 - Common byte 


C 


2 


3 


1 10 - Relocatable byte 


P 


2 


2 


1 1 1 - External reference byte 


X 


2 


3 



Block Data. The block data records contain common numbers which are 
used to order the symbols in the common symbols records for easy refer- 
ence. For example, common number one refers to the common names in 
the first entry of the first common symbols record. Relative location refers 
to the start of the appropriate common, and data count is the number of 
words, not items, in the specified common. 

End Record. The end record indicates the end of the object program, and 
contains the program length in words. 

8. 5. 7 DXOLE OUTPUT FORMATS 

DXOLE has two output formats: object modules and load modules. Object 
modules, output by the Compact mode, have the same record formats as 
previously described for object records. The format of a load module is 
shown in figure 8-4. Table 8- 12 describes the fields of the load module. All 
programs submitted for execution under DX980 must be in load module for- 
mat; object modules cannot be executed directly. 
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ROOT PHASE (MEMORY IMAGE PHASE 0) 



RELATIVE 
RECORD NO . 



K - 1 




1 2 3 4 5 6 



3N WORDS 

A 



N 


1 

j RR 


i_ 1 

1 


L2 

"l 


RR 
2 


l_ 1 
2 


L2 
2 


tto 


N 


i_ l 
N 


N 


LP 


E RC 


W 
00 


- 








CODE FOR ROOT 












- 




E 
LO 


EPA 







BA 



B 



R 
1 


• •• 




R 
LO 


BTA 
01 


BTA 
02 


BTA 03 | ••• 


BTA 
0B 






MEMORY IMAGE PHASE 1 (1ST OVERLAY) 



RR +K 

1 



w 

01 




• •• 




























E 
L1 


EPA 
1 


















BA 

1 


B 

1 


R 

1 1 




R 
L1 


BTA 

1 1 


BTA 

1 2 


• •• 


BTA 

1B 
1 





MEMORY IMAGE PHASE N (LAST OVERLAY) 



RR +K 
N N 



(A)1 30395 



BTA 
N1 



BTA 
N2 



• •• 



Figure 8-4. DX980 Load Module Records 
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Table 8- 12. Load Module Field Definitions 



Field 



N 
LL 



L2 i 



LP 



ERC 



W 



Oi 



E Li 
EPAi 



Definition 



Number of overlays. 

Relative record number of the first word of overlay. The rela- 
tive record number of the root phase (RR Q ) is always 0. 

Number of words in the code portion of the overlay including 
the entry point word. The length of the root phase (LIq) is in 
the File Control Block (FCB) of the load module file and is not 
part of the load module proper. L1 Q includes the length of the 
overhead words for the root segment (3n +3 words long). 

Length of the relocation map in words. L2q is in the FCB of 
the load module and is not part of the load module proper. 

The address of the first word beyond the longest overlay path. 
On the memory image phase file, this word is numerically equal 
to the number of words used by the longest overlay path. The 
word is marked for relocation in the relocate flag table. If the 
load module is executed in the unprivileged mode, no relocation 
will be performed. If the load module is executed in the privi- 
leged mode, a relocation constant equal to the absolute address 
of Wqo wil1 be added. In either case the value in memory is 
the address of the first word beyond the longest overlay path in 
the address space of the executing Job. 

In the memory image phase file this word is numerically equal 
to 3*N+3 and is marked for no relocation in the relocate flag 
table. The correct value is error checked on the load of the 
root phase. After the root phase has been loaded the cell in 
memory is changed to have the absolute address of N. 

Word of the code for overlay i. 

Last word of code for overlay i. 

Entry point address for overlay i. 

Number of sectors required to hold the code portion of overlay 
i. K^ may be calculated from Ll^ or, 

K. = ((Ll i +31)/32)*32, 

using integer arithmetic. 
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Table 8- 12. Load Module Field Definitions (Continued) 



Field 



Definition 



BA; 



B; 



R 



li 



*Li 
BTA U 



RTA.-td. 



BA is a value set by DXOLE to calculate the relocation bias to 
be applied to all relocatable words in the code area from the 
formula, 

BIAS = FWLA-BA, 

where 

FWLA = The address of the first word loaded 

(ADDR(N) if i = or ADDR(W Qi ) if i ± 0) . 

For the root segment BAq is set to -(3*N+3) so the bias will 
evaluate to the address of Wqo when loading a privileged 
program. For preplanned overlays, BA is set to the pre- 
planned address relative to Wqo« For unplanned overlays, 
BA is set to 0. 

Number of byte relocatable items in the code portion of the 
overlay. 

First word of the relocation bits. There is 1 bit for each 
word in the overlay. In the root, the first relocation bit cor- 
responds to the N, the number of secondary overlays. A 1 in- 
dicates a relocatable item. 

Last word of the relocation bits. Includes a bit for EPA^. 

Address of first byte relocatable item in this overlay. 

Address of last bvte relocatable item in this overlav. 



8.6 LIBRARY BUILDER (LIBBLD ) 

The LIBBLD utility program builds library files for use by the DX980 Over- 
lay Link Editor (DXOLE). 

8. 6. 1 STANDARD JCL PROCEDURE 

The following listing is a standard procedure for LIBBLD: 

,# CREATE LIBBLD, COMMENT, "BUILD LIBRARY FILE ■ 

/REPLACE LIBBLD . BUILD LIBRARY FILE . 

/EXEC 0BJ-U, SYSTEM, LIBBLD) MEM«(300, 2000, 1000) pRTY«fl,l5)f 

/ TIME«-»1 MEMt.MEM PRTYj«pRl TIME|»TIM 

/ASSIGN 5 MT1 DEVICE1»D0BJ FIlEi«F0bJ BUFFERS-1 '. OBJECT INPUT 

/ASSIGN 6 SC DEVlCEl«DLST FlLE:«FLsT SHAREl»SLST BUFFERS«i .IDT/DEF LISTING 

/ASSIGN 9 DISCI DEVICEl«DLIB FlLEj«FLlB REPLACF|«RLIB| 

/ BUFFERS»2 INDEXED ACCE3S«(AnY, ANY, ANY, ANY) | 

/ ACCESSMCLIB ALLOCATE.d, 0,128, 20) ALL0CATEt«LLIB| 

/ KEYLEN-B '. OUTPUT I. IB FILE 

/END 
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8. 6. 2 MEMORY PARTITION REQUIREMENTS 
Memory requirements of LIBBLD are: 
MEM = (300, 2000, 1000) 

8.6.3 LUN ASSIGNMENTS 

The LIBBLD utility uses three LUN assignments. Table 8-13 outlines the 
functions of each unit. 



Table 8-13. LIBBLD Logical Unit Assignments 



LUN 



Description 



Provides object input for addition to the 
library file. The LIBBLD utility termi- 
nates when it finds an end of file in this 
input. 

Provides a hard copy listing of the mod- 
ules (IDT names) and of the defined entry 
points within each module in the library. 

Assigned to a key indexed file with a key 
length of 8. This unit contains the 
library file to which the object modules 
will be added. 



8.6.4 OPERATION 

When using LIBBLD, all names must be unique. No two definitions and no 
two IDT names can be the same. The object modules in the library can all 
be added at one time or by several executions of LIBBLD. No object mod- 
ules can be replaced. LIBBLD checks for duplicate IDT names and duplicate 
entry point names. To redefine an object module in the library, the library 
must be entirely rebuilt. 

8.6.5 ERROR CODES 

LIBBLD error messages are literal and self-explanatory. These messages 
are as follows: 

DUPLICATE DEF NAME, FIRST DEF USED <def name> 

DUPLICATE KEY GENERATED FOR IDT 

LIBRARY IS FULL. NO MORE RECORDS CAN BE ADDED. 
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8.6.6 SAMPLE OUTPUT 

The resulting library file is an indexed data set that has the following logical 
organization of keys and associated data: 



QQIDT1 



1700 
1702 



IDT1 
DEF1 



DEF2 



1 7f»A 



DEF1 
DEF2 
QQIDT2 



QQIDT1 

QQIDT1 

1700 IDT2 

1702 DEF3 



DEF3 



1706 
QQIDT2 



8.7 FILE COPY UTILITY (DXCOPY) 

The DXCOPY utility copies and saves data from any type of file or device to 
any other type of file or device. In addition DXCOPY can list the contents of 
a file on a printer. Control parameters for the utility specify or override 
optional functions of the utility. All of these parameters may be omitted to 
specify their default values, DXCOPY also generates keys for key indexed 
files. 

8. 7. 1 STANDARD JCL PROCEDURE 

The following listing is a standard procedure for DXCOPY: 



.# CREATE DXCOPY, COMMENT, "GENERAL PURPOSE COPY • 

/REPLACE DXCOPY , GENERAL PURPOSE COPY . 

/EXEC 0BJ«(1, SYSTEM, DXCOPY) MEM«(300, 3700, 2000) PRTY«fl,J5)| 

/ TIME»-1 MEMi«MEM PRTYi«pRl TlMEl»TIM 

/ASSIGN 5 DUMMY DEVICEl«DC0N 

/ASSIGN 6 DUMMY DEVlCEt«DLST FlLE|«FLST BUFFERS-1 . 

/ASSIGN 7 DISCI DEVICE»«D0UT FIlE»»F0uT REPLACEl«ROUTf 

/ BUFFERS»2 BUFFERSl«BO|jT LlNK8E0|«LIN RELRECt»RELI 

/ iNDEXEDt'IND ACCESS»(ANY#ANy,ANY,ANY) ACCESSl«C0UTl 

/ ALL0CATE»(1, 0,128, 10) ALL0C*TEt«L0UT KEYLEN«6> 

/ KEYLEN:«KOUT LRECL«64 lrecli«gout . 

/ASSIGN 8 DISCI DEVICEl«DIN FILEt-FlN DELETEMTIN BUFFERS-1 . 
/END 



CONTROL/MESSAGE 
LISTING 



OUTPUT 
INPUT 



8. 7. 2 MEMORY PARTITION REQUIREMENTS 

The job area consists of space for the DXCOPY load module. Since DXCOPY 
is an overlaid program, this space contains the root segment plus the longest 
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overlay. If there is no listing (i.e. LUN 6 is assigned to DUMMY), the job 
area size may be specified as 2400. If listings are possible (i.e. LUN 6 as- 
signed to a printing device or file), then the job area size must be specified 
as 3700. 

The job extension area can be calculated according to the following formula: 

NF NB 
<jearea> = £ Z (BS.+j) + 17(NT) + 7(NL) + SS + 11 

i = 1 j = 1 

where 

NF = Number of files assigned (0<NF<3) 

NB = Number of buffers per file (1 NB<x depending on amount of 
blocking) 

BS = Physical record length in words of the individual files 

NT = 2 co- resident tasks if the listing LUN (6) is assigned to DUMMY; 
3 co- resident tasks if the listing LUN (6) is assigned a printing 
device or file 

NL = 4 LUNs assigned 

SS = 600 for dynamic TCB stack requirement if LUN 6 is assigned to 
DUMMY; 900 if LUN6 is assigned to a printing device or file 

Therefore, 

<jearea> = 673 + BB if LUN 6 assigned to DUMMY or, 
<jearea> = 990 + BB otherwise 

where: 

BB = total blocking buffer requirements for all files. 

A default of MEM=(300, 3700, 2000) has been used in the standard procedure 
which allows the listing option and 1000 words of file buffer space. 

8. 7. 3 LUN ASSIGNMENTS 

The utility program uses four logical unit number (LUN) assignments, as de- 
scribed in table 8-14. 
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Table 8-14. DXCOPY Logical Unit Assignments 



LUN 


Description 


5 
6 
7 
8 


Control input 
Listing output 
Data output 
Data input 



8.7.4 OPERATION 

The DXCOPY utility is a multitask program that runs under DX980 in the 
protected mode, A minimum of two tasks run concurrently. A third task is 
created if a listing is possible (i. e. LUN 6 is assigned to other than DUMMY). 

The user enters any of the control parameters on LUN 5. The entry is in 
free format with one or more blanks between each parameter. All param- 
eters must be within the same record. For many cases, however, the de- 
fault values of the parameters produce the desired results so that none of the 
parameters need to be specified. If all of the control characters are entered, 
the input record is of the following form: 

< typo, < key specification^ <defiriition>, < rewind option>, TRIM, <list>. 

The following paragraphs describe each of these parameters and their default 
values. 

8. 7.4. 1 DATA TYPES AND CONVERSIONS. DXCOPY performs the re- 
quired file conversion and copying according to the type of input and output 
files without the data type (<type>) being given explicitly. However, certain 
types of copies do require explicit definition in order to perform the desired 
conversion. Data type specifies the format of the input. The output file data 
is dictated by the input data type and what kind of files are being used (key 
indexed, relative record, linked sequential, or other device). The following 
file types may be used for the < typo control parameter: 

• SOURCE: Source files may exist on any file type. This data type 
is the default value for linked sequential files and non-disc devices. 

• DATA: Data is the default data type when the input file is key in- 
dexed. The Data parameter must be stated if the input or output 
media is binary format paper tape, card, or cassette in order to 
obtain correct input conversion. 

• RELOBJ: Relocatable object is never the default data type. This 
parameter must be specified to verify checksum, or if the input or 
output media is cards, paper tape, or cassette. 
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• MEMI: Memory image is the default data type if either the input file 
or output file is a relative record file. Memory image files exist in 
relative records files as two header words in the File Control Block 
and a group of 32 word records. When DXCOPY transfers the file 
to any other media, it generates a header record followed by data 
records and an end of file. Figure 8-5 illustrates the final format. 
The user must specify either Data or Source for copying relative 
record files that are not load module files. 

• SAVED: Saved data is created by copying a (key indexed) file to a 
file that is not a key indexed file. SAVED is the default data type 
when the input file is indexed and the output file is not indexed. A 
key specification input of NOKEYS overrides the creation of Saved 
files. Saved files consist of physical records of 72 characters or 
less. This organization allows large logical records to be trans- 
mitted on card media. (Figure 8-6 illustrates the format of a 
Saved file. 

8.7.4.2 KEY SPECIFICATIONS. Key specification parameters allow the 
user to set the characteristics of the keys or to delete input keys in the out- 
put file. DXCOPY accepts the following words for key specification inputs: 

• KEYLEN=<nchar>: This parameter specifies the length of keys in 
characters. Default length key is 30 characters. 



(A)l 301 04 



HEADER 
RECORD 


1800 16 


NUMBER OF 

DATA 

RECORD 


HEADER 
WORD 1 


HEADER 
WORD 2 


CHECKSUM 




^_ 






10 CHARACT 














-^ 


DATA 
RECORD 


1801 16 


3 2 DATA 


/ } WORD 


CHECKSUM 




^_ 






68 CHARACT 



















THE DATA RECORD CHECKSUM IS THE SUM OF ALL DATA WORDS THE 
HEADER WORD (1 80 1 16 ) AND THE DATA RECORD NUMBER . 

Figure 8-5. Memory Image Format for Files 
Other than Relative Record 
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SINGLE 
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(A)130105 



■WORD BOUNDARY 



KEYLENGTH 
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Figure 8-6. Saved File Format 
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• KEYPOS=<mchar>: This parameter specifies that a key should be 
generated for each record of input, starting at the character number 
given to the right of the equal sign (<mchar>). 

• NOKEYS: This parameter specifies that any keys found in the input 
file should not be transferred to the output file. This parameter 
overrides the Saved data specification. 

8.7.4.3 DEFINITION. The user can enter: 

FLLES=<nfiles> 

to specify copying more than one set of data (delimited by an end of file) to 
the output file. The argument, <nfiles>, is either a number specifying how 
many data sets to copy, or an asterisk (*) to specify copying all data sets 
until an end of media is detected. All end of files are transmitted to the out- 
put file unless the output file is a key indexed or relative record file. These 
output file types cause DXCOPY to declare an error and abort when more 
than one file is transferred. 

8.7.4.4 REWIND OPTIONS. DXCOPY normally rewinds the input and out- 
put files before beginning the copy. However, the user can prevent rewinding 
the input file by specifying NOINREW. Similarly, entering NOOUTREW pre- 
vents rewinding of the output file. 

8. 7.4. 5 TRIM OPTION. If the user enters TRIM for a control input, 
DXCOPY trims trailing blanks before copying to the output file. 

8. 7.4. 6 LISTING OPTIONS. If LUN 6 is not assigned to Dummy, DXCOPY 
generates two types of listings by default. The utility produces a source list 
if the data type is Source, or an identification listing if the data type is relo- 
catable object (RELOBJ). In addition, the user can enter the following param- 
eters to select printing of optional data: 

• RECNO: This parameter specifies printing of record numbers. 

• KEYS: This parameter causes the keys to be listed. The key is 
assumed to be valid USASCII. This listing is printed in hexadecimal 
if the HEX parameter is also specified. 

• HEX: This parameter results in a hexadecimal listing. 

• ASCII: This parameter instructs DXCOPY to print the USASCII 
equivalent to the right of the hexadecimal listing. 

• WIDE: This parameter specifies that a 132 column printer is avail- 
able on LUN 6 instead of an 80 column printer. Hexadecimal dumps 
are then printed at 16 words per line instead of 8 words per line. 

8. 7. 5 ERROR CODES 

When an error occurs during processing, DXCOPY prints an error code on 
the terminal. Table 8-15 defines the error codes. 
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Table 8-15. DXCOPY Error Messages 



Code 



Definition 



11001 
11002 
11003 
11004 
11005 
11006 
11007 

11008 

11009 

11010 

11011 
11012 
11013 
110 14 

11016 



Unrecognizable parameter specified 

Invalid number 

More than one data specification 

Key length not > 1 and < 32 

Invalid key position specified 

Trim cannot be specified with given (or default) data type 

When copying memory image data from a non- relative rec- 
ord file, the first record was not the expected header 
record. 

When copying memory image data from a non- relative rec- 
ord file, a non-memory image data record was detected 

When copying saved data, a record was found that was not 
an 1810 record when an 1810 was expected 

When copying saved data, a record was found that was not 
an 1811 record when an 1811 record was expected 

An unexpected end of file was detected 

An end of file was not found when an end of file was expected 

A logical error was detected when writing to an indexed file 

An embedded end of file was detected, but the output file is 
either relative record or indexed 

Checksum error 



8.8 PROGRAM DEBUG (DEB980) 

DEB980 is a standalone utility package that aids in debugging user programs 
without endangering system operation. The package includes commands that 
permit the user to modify or display contents of memory and registers, and 
control execution of the program being debugged. Control of execution may 
be either interactive or batch, and includes loading, setting of breakpoints, 
and specifying traces. Program instructions may be executed one at a time 
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to allow examination of results following each instruction. DEB980 is de- 
signed for debugging single tasking jobs and does not support the following 
SVCs: 

• 6 - Delete Task 

• 7 - Suspend Task 

• 8 - Post Event 

• 30 - Create Task 

• 37 - Load 

• 38 - Load and Relocate 

• 49 - Allocate Resource 

• 51 - De-allocate Resource 

• 129 - Start Job 

This program is completely documented in a separate manual: Model 960 
Computer and Model 980 Computer Debug User's Guide and Operating In- 
structions , Part Number 942760-9701. 

8. 8. 1 STANDARD JCL PROCEDURE 

The following listing is a standard Tocedure for DES Q 80: 

,# CREATE DEB980, COMMENT, "PROGRAM DEBUG AID " 

/REPLACE DEB980 • PROGRAM DEBUG AlD . 

/EXEC 0BJ«U, SYSTEM, DEB980) MEM»(300»6000,600) PRTY«(1,15)| 
/ TIME«»1 MEM|«MEM PRTV|«PRI TlMEt«TIM 

/ASSIGN *F0 8C DEVlCEl«DCIN ' CONTROL INPUT 

/ASSIGN ,P1 SC DEVICE|«DMSG ' SYSTEM MES«UGF 

/ASSIGN ,F2 DUMMY DEVICE|*DCLST ; CONTROL I ISTING 

/ASSIGN >F3 SC . DEVICEt«DUMP FlLEl.FuMP BUFFERSM '. MPMOR? Vump 

/ASSIGN *F4 DISCI DEVICE|»D0BJ FlLEl*F0BJ BUFFERS-! r . REL0C OBJECT IN 

/ASSIGN DUMMY DEVICEt«DEV0 ' u3ER PR0C l UN 

/ASSIGN 4 DUMMY DEVlCEl«DEV4 FlLEf«PlL4 BUFFERS"! ' USER PROG LUN 4 

/ASSIGN 5 DUMMY DEYICEl«DEV5 FlLEl*PlL5 BUFFERS-! C USER PROG LUN 5 

/ASSIGN 6 DUMMY DEVICEfDEVS FlLEl-PlLB BUFFERS-1 ' USER PROG LUN 6 

/ASSIGN 7 DUMMY DEVICEfDEV7 ' nS™ prog LUN 7 

/ASSIGN 8 DUMMY LUN0t«LUN8 DEVICEI-DEV8 r m US |r PROG LUN 8 
/END 

8. 8. 2 MEMORY PARTITION REQUIREMENTS 

The job area consists of space for the DEB980 load module plus space de- 
pendent on the program being debugged. The following formula specifies the 
job area size requirements: 

<jarea> = 3000 + PS + WA + ST 

where 

3000 = DEB980 load module size 

PS = Size of user program object module being debugged 

WA = Work area for program being debugged 

ST = Storage for symbol table and commands 
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The job extension area can be calculated according to the following formula: 

NF NB 
<jearea> = ]£ £ (BS^l) + 17(NT) + 7(NL) + SS + 11 

i = 1 j = 1 

where 

NF = Number of files assigned 

NB = Number of buffers per file (1 < NB < x depending on amount of 
blocking) 

BS = Physical record length in words of the individual files 

NT = 1 co- resident task 

NL = 5 + number of user program LUNs 

SS = 300 for dynamic TCB stack requirement 

Therefore 

<jearea> = 363 + 5(UL) + BB 

where UL = Number of user program LUN's; BB = total blocking buffer re- 
quirements for all files. 

A default of MEM=(300, 6000, 600) has been used in the standard procedure. 

8.8.3 LUN ASSIGNMENTS 

NOTE 

■ Unlike most utility programs, DEB980 LUN assign- 
ments are hexadecimal numbers. 

Table 8- 1 6 lists the logical unit (LUN) assignments for the DEB980 program. 
In addition, all LUN assignments used in the user program being tested must 
also be assigned to the DEB980 program. 

8.8.4 OPERATION 

Refer to the Debug User's Guide for a description of program operation. 

8.8. 5 ERROR CODES 

Refer to Section VI of the Debug User's Guide for a description of error 
codes and messages generated by DEB980. 

8. 8. 6 SAMPLE INPUT 

Refer to the Debug User's Guide for sample input format. 
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Table 8-16. DEB980 Logical Unit Assignments 



LUN 


Function 


Description 


F0 16 


Control input 


Inputs debug commands 


Fli6 


Control log 


Displays operation messages, error mes- 
sages, simulation termination messages, 
and command requests 


F2 16 


Input log 


Lists commands entered on control input 
device 


F3 16 


Dump and 
trace output 


Prints dump and trace messages 


F4i6 


Program input 


Inputs object program being debugged. 
This file must be direct output either from 
the assembler or from DXOLE in the Com- 
pact mode. 



8.8.7 SAMPLE OUTPUT 

Refer to the Debug User's Guide for sample output format, 



Q n CVlyrTJOT Tr A CCTTA/fRT . TTT? /QADH 



The general assembler, SAPG, translates 980 symbolic assembly language 
into object language acceptable to the Model 980 Computer. SAPG is a two 
pass assembler. During Pass 1, a symbol table is generated as the source 
program is read. Pass 2 generates the object output and program listing 
using both the source program and the generated symbol table. More de- 
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Computer Assembly Language Programmer's Reference Manual, Part Num- 
ber 943013-9701. 

8. 9. 1 STANDARD JCL PROCEDURE 

Standard JCL procedures are listed below for the single job step assembly 

job and for the 3- step assemble, link and go job sequence. 

.# CREATE ASMBLR, COMMENT, "ASSEMBLE 

/REPLACE ASMBLR • ASSEMBLE . 

/EXEC 0BJ*(l, SYSTEM, ASMBLR) MEM«<300, 5000, 1000) PRTY«(l,l5)f 



SYSTEM MESSAGE 
CONTROL/MESSAGE 
SOURCE INPUT 



TIME«»t MEM|»MEM PRTYt*pRI TlMEl«TIM 

/ASSIGN DUMMY DEVICEt*DM8G SHARE ' r 

/ASSIGN 4 DUMMY DEVlCEt>DCON SHaREI«SCON r 

/ASSIGN 5 DISCI DEVICEt*D8RC FIlEi«FSrC BUFFERS*! . _ ... 

/ASSIGN 6 SC DEVlCEl*DL8T FlLEt*FLST 8HAREJ*SLST BUFFERS*! .SOURCE l.IST/ERROR 

/ASSIGN 7 DISCI DEVlCEl*D0BJ FlLEt*FOBJ NEWt*N0BJ> 

/ REPLACE|*R0BJ BUFFERS.! LlNKSEQf 

/ ACCE9S"(ANY,ANY*ANY*ANY) accessi«cobj> 

/ ALLOCATE«(1,0,64,10) ALL0CAtE|*L0BJ . OBJECT OUTPUT 

/ASSIGN 16 DISCI FILE»CTEMP,SCRL) NEW BUFFER8-1 LINKSEQI 

/ ACCESS«(ANY,ANY,ANY,ANY) ALLOCATE* (10, 300,256, 30) 

/END 

(Continued on next text page) 



SOURCE SCRATCH 
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(Continued from previous text page) 

,# CREATE ASMLGO, COMMENT, "ASSEMBLE. LINK, AND GO ■ 

/REPLACE ASMLGO . ASSEMBLE, LINK, AND GO . 

/EXEC 0BJ«(l, SYSTEM, A3MBLR) MEM«(300, 5000, 1000) PRTY«(I,15)| 

/ TIME«-1 MEMl«MEMA 

/ASSIGN DUMMY DEVICEl'DMSG SHARE 

/ASSIGN 4 DUMMY DEVICE»«DCON SHaREI«SCON 

/ASSIGN 5 DISCI DEVICEl«DSRC FIlEi«FSrC BUFFERS-i i 

/ASSIGN 6 SC DEVICE»«DLSTA FlLEl»FLSTA BUFFERS»1 

/ASSIGN 7 DISCI FILE«(TEMP, OBJECT) NEw BUFFERS»1 LINKSEQI 

/ ACCESS«(ANY,ANY»ANY,ANY) ALlOCATE«(10,300,64,10) 

/ASSIGN 16 DISCI FILE«(TEMP,SCRL) NEW BUFFERS«1 LINKSEQI 

/ ACCESS"(ANY,ANY,ANY,ANY) ALlOCATE«(10,300, 256,30) , 

/EXEC 0BJ«(l, SYSTEM, DXOLE) MEM«(300, 12000,3000) PRTY«fl , 15) ; 

/ TIME«-1 MEM|«MEML 

/ASSIGN 5 DISCI FILE«(TEMP, OBJECT) DELETE BUFFERS-1 

/ASSIGN 6 SC DEVICEI«DLSTL FiLEI«FL3TL BUFFERS«1 

/ASSIGN 8 DISCI FILE«(TEMP,LM) NEW BUFFER8M RELREC LRECL-64; 

/ ACCESS"(ANY,ANY,ANY,ANY) AlLOCATE»U0,300,32,10) 

/ASSIGN 9 DUMMY 

/ASSIGN 10 DISCI FILE»(TEMP,SCRL) DELETE BUFFERS-I 

/ASSIGN 13 DISCI FILE»(TEMP,SCRR) NEW DELETE BUFFERS»1 RELREC 

/ ACCESS»(ANY,ANY,ANY,ANY) ALLOCATE«(10, 300, 128,10)> 

/ LRECLP100 

/EXEC OBJ»(t,TEMP,LM) MEM«(300, 4000,1000) PRTY«(1,15)| 

/ TIME«100 MEMI»MEMG TlMEi«TlMG 

/ASSIGN 4 DUMMY DEVICEI-DEV4 FlLEt«FlL4 BUFFERS-2 

/ASSIGN 5 SC DEVICE!»DEV5 FlLE|»FlL5 BUFFERS«2 

/ASSIGN 6 SC DEVICEI«DEV6 FlLEi«FlL6 BUFFERS«2 

/ASSIGN 7 DUMMY DEVICEI»DEV7 

/END 



SYSTEM MESSAGE 
CONTROL/MESSAGE 
SOURCE INPUT 
SOURCE l.IST/ERROR 

OBJECT OUTPUT 

SOURCE SCRATCH 



PRIMARY INPUT/CON 
LOADMAP LIST/ERR 

LOAD MOD OUTPUT 
LIBRARY FILE 
LINKSEQ SCRATCH 



RELREC SCRATCH 



USER PROG LUN 4 
USER PROG LUN 5 
USER PROG LUN 6 
USER PROG LUN 7 



8. 9. 2 MEMORY PARTITION REQUIREMENTS 

The job area consists of space for the load module of the assembler and any- 
work space required by the assembler for symbol table storage. The number 
of words required for a single symbol table entry is a function of the number 
of characters in the symbol as shown in table 8-17. The job area require- 
ment may be calculated using the following formula: 

<jarea> = 3650 + 3(S12) + 4(S34) + 5(S56) 

where: 

3650 = SAPG load module size 

S12 = Number of symbols in table with a 1 or 2 character length 
S34 = Number of symbols in table with a 3 or 4 character length 
S56 = Number of symbols in table with a 5 or 6 character length 

A job area size of 5000 words will allow the assembly of a program with as 
many as 270 symbols. 
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Table 8-17. Symbol Table Memory Allocation 



Symbol Length 
in Characters 


Words Required 
in Symbol Table 


1-2 

3-4 
5-6 


3 

4 

5 



The job extension area can be calculated according to the following formula: 

NF NB 
<jearea> = £ £ (BSi+1) + 17(NT) + 7(NL) + SS + 11 

i = 1 j= 1 

where 

NF = Number of files assigned (0 < NF < 3) 

NB = Number of buffers per file (1 < NB < x, depending on amount of 
blocking) 

BS = Physical record length in words of the individual files 



NL = 6 LUNs assigned 

SS = 300 for Dynamic TCB stack requirement 
Therefore, 

<jearea> = 370 + BB 

where BB is the total blocking buffer requirements for all files. 

To assemble a program using the standard JCL procedure provided previously 
in this section using input and output files having physical record lengths of 
256 words or less, a job extension area of 1000 words is adequate. 

8. 9. 3 LUN ASSIGNMENTS 

Table 8-18 lists the logical unit assignments for the assembler. 
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Table 8-18. SAPG Assembler Logical Unit Assignments 



LUN 


Description 


Comments 





System error messages 


Any printing device 


4 


Messages and control 


Any input /output device 


5 


Source input 


Any input device /file. If not re- 
windable, LUN 16 must be assigned 
to a rewindable device /file, or in- 
put must be manually input twice. 


6 


Output listing and 
error messages 


Any printing device /file 


7 


Relocatable object output 


Output device /file 


16 


Temporary storage of 


Any input device/file. If rewind- 




source input 


able, it is used as input to Pass 2; 
if not rewindable, LUN 5 provides 
input to Pass 2. 



8.9.4 OPERATION 

The SAPG assembler is a single- task program that runs under DX980 in the 
protected mode. Figure 8-7 illustrates the operation and LUN assignments 
for SAPG. The assembler first determines if the source input (LUN 5) is re- 
windable. If it is not rewindable, SAPG prints the message: 

READY SOURCE, HIT C/R 

on LUN 4. When this message appears, the operator should ready the source 
device, if necessary, and then select a carriage return on LUN 4. This con- 
trol interaction can be eliminated by assigning the message and control (LUN 
4) to DUMMY. Pass 1 reads the source from LUN 5 until it reads a record 
containing an END directive. After the END is processed, Pass 1 terminates 
and Pass 2 begins. 

Pass 2 obtains the source input from one of two sources: 

1) If LUN 16 has been assigned to a rewindable device or to a file, 
Pass 1 copies the source input to LUN 16 and Pass 2 uses LUN 16 
for its input. 

2) If LUN 16 has been assigned to a no n- rewindable device, Pass 2 
uses the primary source input, (LUN 5) for input. If LUN 5 is as- 
signed to a rewindable device or to a file, Pass 2 automatically re- 
winds LUN 5. If LUN 5 is not rewindable, the source input control 
message: 

READY SOURCE, HIT C/R ' 

is again printed to LUN 4. After repositioning the source in LUN 5, 
select carriage return. 
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'MESSAGES 
AND CONTROL 
LUN 4 



SOURCE INPUT 
LUN 5 




PASS 1 

BUILD TABLES 



r 




'SOURCE INPUT, 
LUN 5 



r MESSAGES 

AND CONTROLJ 
LUN 4 



^ PASS 2 



1. PROCESS FIELDS. 

2. OUTPUT MACHINE 
LANGUAGE EQUIVALENT 

3. LIST ERRORS. 



note; 



SYSTEM 
ERRORS 
LUN 



LIST OUTPUT 
AND ERRORS 
LUN 6 




RELOCATABLE 

OUTPUT 

OBJECT 



SOME FUNCTIONAL BLOCKS INDICATE THAT / 
A REWIND IS REQUIRED BEFORE PROCESSING I 
MAY CONTINUE. THE REWIND CAPABILITY R 
IS DEFINED AS FOLLOWS. 




AUTOMATIC REWIND 



MANUAL REWIND 



CARDS 



(A)1 30097 



Figure 8-7. SAPG Assembler Functional Diagram 
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Pass 2 produces a listing and the bulk of the object output, and terminates 
processing when it encounters an END directive. At that time Pass 1 re- 
starts. The SAPG assembler continues to process source inputs terminated 
by an END directive and generates corresponding output object modules until 
it reads an End of File (EOF) record (/*) to terminate the assembly. It then 
outputs an EOF record and trailer at the end of the object output to indicate 
assembler termination. To execute any object program under DX980, the 
module must be linked using the link editor, DXOLE, 

8. 9. 5 ERROR CODES 

When SAPG reads the source program, it may detect format errors. Detec- 
tion of an error prints a diagnostic message on LUN 6. If the error is de- 
tected in Pass 1, the message appears before the listing. If the error is de- 
tected in Pass 2, the message is printed adjacent to the source line in question. 
A total number of errors encountered in the assembly is given at the end of 
the listing. Table 8-19 lists the possible error messages printed by SAPG. 

8. 9. 6 SAMPLE INPUT 

Figure 8-8 illustrates the source input to the SAPG assembler. 

8.9.7 SAMPLE OUTPUT 

Figure 8-9 illustrates the object module output from the SAPG assembler. 

8. 10 FORTRAN IV COMPILER 

The FORTRAN compiler furnished with the DX980 operating system exceeds 
the specifications set forth in the American National Standards Institute pub- 
lication number USAS X3. 9- 1966. The FORTRAN compiler is a 1-pass, 2- 
phase compiler that outputs an intermediate pseudo object of tables and link- 
age information at the end of Phase 1. Using the mass storage capability of 
the DX980 system, the operator need not handle the pseudo object output. 
More detailed characteristics of this compiler are described in the FORTRAN 
manual referenced in the Preface to this manual. 

8. 10. 1 STANDARD JCL PROCEDURE 

Standard JCL procedures are listed below for the 2-step FORTRAN compile 
job sequence (Phase 1 and Phase 2) and for the 4-step FORTRAN compile, 
link and go job sequence. This procedure does not permit searching of any 
alternate, user-supplied libraries other than the standard FORTRAN library. 
To enable additional searches, a separate JCL procedure must be written 
with modifications to the job step portion of DXOLE. These modifications in- 
clude assignment of the object module (TEMP, OB JECT) to an unused LUN, 
assignment of the alternate library file to another unused LUN, and assign- 
ment of the required DXOLE control commands (either in a file or from an 
input device) to LUN 5. 
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,# CREATE FTNPSi, COMMENT, "FORTRAN PHASE 1 COMPILE " 

/REPLACE FTNPSi . FORTRAN PH^SE 1 COMPILE • 

/EXEC OBj*(l, SYSTEM, FTN) MEM*(300, 8000. 1000) PRTY*(1,15)J 



TIME«-1 MEMi*MEM PRTYt*pRl TlMEl»TIM 

e dummy devicei*dmsg share '. system message 

5 DISCI DEVlCEl*DSRC FIlF|*FSrC BUFFERS*1 '. SOURCE INPUT 

6 SC DEVICEt*DLST FlLE|*FLST SHAREl*8LST RUFFERS«t .SOURCE t.IST/ERROR 

7 DISCI DEVICEI«DINT FlLEt*FlNT BUFFERS«1 LINKSEQ; 
ACCESS«(ANY,ANY,ANY,ANY) ALLOCATE«U.0,64,30)J 
NEW|«NINT REPLACE»«RlNT ACCESSi«CINT ALLOCATEl*LINT 



/ASSIGN 

/ASSIGN 

/ASSIGN 

/ASSIGN 

/ 

/ 

/END 

/REPLACE FTNPS2 . FORTRAN PHASE 2 COMPILE . 

/EXEC 0BJ*(1, SYSTEM, FTNPS2) MEM*(300,8000, 1000) PRTY*fi,15)J 



SOURCE SCRATCH 



/ASSIGN 

/ASSIGN 

/ASSIGN 

/ 

/ 

/ASSIGN 

/END 



SYSTEM MESSAGE 



TIME«-1 MEM»«MEM PRTY|»PRI TIME««TIM 
DUMMY DEVICEl»DMSG SHARE 

6 SC DEVICE:«DLST FlLEi«FLST SHAREJ«SLST BUFFERS*! .ERROR MMSSG&5 

7 DISCI DEVICEI«D0BJ FIlEi»FObJ BUFFERS*1 LINKSEQ* 
ACCES8«(ANY,ANY,ANY,ANY) ALLOCATE«(1,0,64,10) f '. OBJECT OUTPUT 
NEW|«N0BJ REPLACEl-ROflJ ACCESS|*COBJ ALLOCATE:»LOBJ 

8 DISCI DEVICE:«DINT FlLF**FlNT BUFFERS«1 . INTERMED ORJECT 



,# CREATE FTNLGO, COMMENT, "FORTRAN COMPILE, LINK, AND GO" 

/REPLACE FTNLGO . FORTRAN COMPILE* LINK. AND GO . 

/EXEC 0Bj*(l, SYSTEM, FTN) MEM*(300,10000,1000) PRTY«(1,15)J 

/ TIME--1, MEMI»MEMC 

/ASSIGN DUMMY DEVICEI»DMSG SHARE 

/ASSIGN 5 DISCI DEVICEt*D8RC FlLEi*FSRC BUFFERS*! 

/ASSIGN 6 SC DEVICEl*DLSTl FlLE*«FL3T BUFFERS»1 

/ASSIGN 7 DISCI FILE*(TEMp. PHASED NEW BUFFERS*! LINKSEQI 

/ ' ACCESS»(ANY,ANY#ANY,ANY) ALlOCATE«(10,300,64,30) 

/EXEC 0BJ«(1, SYSTEM, FTNPS2) MEM*(300, 8000. 1000) PRTY«fl,15)> 

/ TIME»-1 MEM|»MEMC 

/ASSIGN DUMMY 

/ASSIGN 6 SC DEVICE:*DLST2 

/ASSIGN 7 DISCI FILE* (TEMP. OB JEcT) NEw BUFFERS*! LINKSEQ? 

/ ACCESS«(ANY,ANY,ANY,ANY) ALlOCATE«(10.300,64,10) 

/ASSIGN 8 DISCI FILE«(TEMP, PHASED BUFFERS«1 

/EXEC 0BJ*(1, SYSTEM, DXOLE) MEM«(300, 12000.3000) PRTY*fl,15)| 

/ 

/ASSIGN 

/ASSIGN 

/ASSIGN 

/ 

/ 

/ASSIGN 



TIME*-1 MEMi*MEML 

5 DISCI FILE*(TEMP, OBJECT) DELETE BUFFERS*1 

6 SC DEVICEI*DLSTL FremFlST BUFFERS»1 
8 DISCI FILE*(TEMP,LM) NEW BUFFERS*! RELRECJ 

ACCESS" (ANY, ANY, ANY, ANY) ALLOCATE* (10, 300, 32, 10) t 

LRECL*64 

9 DISCI FILE«(SYSTEM,USrFTN) BUFFERS«2 

/ASSIGN 10 DISCI FILE«(TEMP. PHASED DFLETE BUFFERS*1 

/ASSIGN 13 DISCI FILE»(TEMP,SCRR) NEW DELETE BUFFERS«1 RELREC 

/ ACCESS*(ANY,ANY,ANY,ANY) ALLOCATE*(10, 300, 128, 10)1 

/ LRECL*100 

/EXEC 0BJ«(1,TEMP,LM) MEM* (300,8000, 1000) PRTY*(l,15)i 

/ TIMEM00 MEM|«MEMG TlMEi*TlMG 

/ASSIGN SC DEVICEl*DMSG 

/ASSIGN *B0 SC DEVICEl*DEV0 

/ASSIGN *B1 DUMMY DEVICEl*DEVl 

/ASSIGN >B5 SC DEVICEl«DEV5 FiLEl*FlL5 BUFFER3*2 

/ASSIGN *B6 SC DEVICE|*DEV6 FiLEX*FlL6 BUFFERS*2 

/ASSIGN >B8 DISCI FILE*(TEMP,SCRL) NEW BUFFER8*1 LINKSEO? 

/ ACCESS*(ANY,ANY.ANY#ANY) ALLOCATE* ( 10,300.32, 10) 

/END 



SYSTEM MESSAGE 
SOURCE INPUT 
SOURCE l.IST/FRROR 
INTERMED OPJECT 
SOURCE SCRATCH 



SYSTEM MESSAGE 
ERROR MESSAGE 

OBJECT OUTPUT 
INTERMED OBJECT 



PRIMARY INPUT/CON 
LOADMAP LIST/ERR 

LOAD MOD OUTPUT 

LIBRARY 
LINKSEQ SCRATCH 

RELREC SCRATCH 



r SYSTEM MESSAGE 

. USER LUN 

' USER LUN 1 

r USER LUN 5«INPUT 

. USER LUN 6*0UTPUT 

'. USER SCRATCH FILE 
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Table 8-19. SAPG Error Messages 



Message 

Number 


Message 


Meaning (and Corrective Action) 


1 


FIELD SZ 


Address beyond reach (use @ for extended 
format) 


2 


UNDF OP 


Undefined operation code (check list of valid op 
codes) 


3 


LONG SYM 


Symbol > 6 characters 


4 


MDF O/F 


OPD or FRM multiply defined (rename label) 


5 


FRM > 16 


FRM fields contain more than 16 bits 


6 


CAD > 10 


Address expression > 10 elements 


7 


UNDF SYM 


Symbol not defined (label probably omitted) 


8 


MDF SYM 


Symbol multiply defined (rename labels) 


9 


RELOC 


A relocation error (use only relocatable label in 
arithmetic expression, or ORG statement can 
use only one relocatable label) 


10 


SYM OVF 


Too many symbols have been defined (cut out 
symbols or divide program) 


11 


BAD NUM 


Numeric element not valid (properly define 
item in label or address field) 


12 


IMP R/D 


A REF or DEF symbol has been used improperly 
(REF symbol defined inside and outside the pro- 
gram ; DEF symbol not defined in the program) 


13 


X RF USE 


A REF symbol has appeared invalidly in an un- 
relocatable expression 


14 


IXB ERR 


Address mode error (improper use of IXB field) 


15 


OPD ERR 


No such OPD format number 


16 


ADR MODE 


Illegal addressing mode (improperly written ad- 
dress) 
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/* (EOF) 



J END 



/I 



F 



f' 



[ ENE 



£ 



f 



/text 



(A)1 30396 



Figure 8-8. Assembly Language Source Input to SAPG 



/ * (EOF) 



(A)130397 




Figure 8-9. Object Module Output from SAPG 
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8. 10. 2 MEMORY PARTITION REQUIREMENTS 

The job area required to run Phase 1 and Phase 2 of the FORTRAN compiler 
consists of space for the load modules as well as dynamic workspace. For 
Phase 1, this job area is defined by the equation: 

<jarea>i = LM, + WSj 

wh ere 

LMj = 6650 (Phase 1 compiler load module size) 

WSj = workspace required (program size dependent) 

A job area size of 8000 words for the Phase 1 compilation job step allows for 
compiling a small FORTRAN program. For Phase 2, the job area size is 
defined by the equation: 

<jarea>2 = LM + WS 

wh ere 

<jarea>2 = job area size for Phase 2 

LM2 = 2800 (Phase 2 compiler load module size) 

WS2 = workspace required (program size dependent) 

A job area size of 8000 words for the Phase 2 compilation job step allows 
for compiling a small FORTRAN program. 

The job extension area can be calculated according to the following formula: 

NF NB 
<jearea> = £ £ (BS. + 1) + 17(NT) + 7(NL) + SS + 11 

i = 1 j = 1 

where 

NF = Number of files assigned to the job step (0 < NF < 3) 

NB = Number of buffers per file (0 < NB < x, depending upon amount of 
blocking) 

BS = Physical record length in words of the individual files assigned to 
the job step 

NT = 1 co- resident task 

NL = 4 LUNs assigned to the compiler 

SS = Dynamic TCB stack requirement (300 for compiler) 

Therefore, 

<jearea> = 356 + BB 
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where BB is the total blocking buffer requirements for all files assigned to 
the job step. For compiling the previously listed standard JCL procedure 
using input and output files having physical record lengths of 256 words or 
less, a job extension area of 1000 words is adequate. For Phase 2, the re- 
quired jearea is also 1000. 

8. 10. 3 LUN ASSIGNMENTS 

Tables 8-20 and 8-21 list the logical unit assignments for the Phase 1 and 
Phase 2 FORTRAN compiler job steps, respectively. 

Table 8-20. FORTRAN Compiler Phase 1 LUN Assignments 



LUN 


Description 


Comments 





System error messages 


Any input /output printing 


device 


5 


Source input 


Any input device/ file 




6 


Output listing and 
error messages 


Any printing device/ file 




7 


Output to Phase 2 


Output device /file 





.>?i_c»v> phase 2 LUN Assignment! 



LUN 



Description 



System error messages 

Output listing and 
error messw.gv-.ij 

Relocatable object out- 
put 

Input from Phase 1 



Comments 



Any input/output printing device 
Any printing device /file 

Output device /file 

Any input device /file 



8.10.4 OPERATION 

The FORTRAN compiler is a single-task program that runs under DX980 in 
the protected mode. The compilation of a FORTRAN program consists of a 
2- step job: Phase 1 and Phase 2 compilations. Figure 8-10 provides a func- 
tional diagram of the FORTRAN compiler, including LUN assignments. 

The FORTRAN Phase 1 compiler first determines if the source input (LUN 5) 
is rewindable. If it is not rewindable, the compiler prints the message: 

READY INPUT, HIT C/R 
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FORTRAN PHASE 1 

1. SYNTAX SCAN 

2. BUILD SYMBOL 
TABLES 

3. ALLOCATE MEMORY 

4. SOURCE LIST WITH 
ERROR MESSAGES 

5. OUTPUT PSEUDO- 
OBJECT 




/ CONTROL / 


/ SOURCE LIST / 


r 7 




7 LUN 6 / 






/SOURCE file / 


/pseudo-object/ 
/ (constants / 


/ LUN 5 f~ 




/ INFO) J 

J LUN 7 f7] 




i ' 
1 






1 


I 
1 
| 








* 


FORTRAN PHASE 2 

1. CREATE BASE PAGE 
CONSTANTS 

2. CREATE PAGING 
CONSTANTS 

3. OVERFLOW CHECK 
A. OUTPUT LINKABLE 

OBJECT 




/ PHASE 2 / 


/ ERROR / 


/ LUN BJ 




/ LUN 0/ 








/ OBJECT / 




7 lun r/ 







note; 

system logical units corresponding to 
fortran units that have been used in a 
fortran program must be assigned to 
applicable physical devices before the 
fortran program is run. these system 
run-time units are listed in the following 

TABLE; 



FORTRAN RUN-TIME LOGICAL UNITS 


FORTRAN UNIT 


SYSTEM UNIT 


TO 9 


BO TO B9 


10 TO 15 


BA TO BF 


16 TO 25 


CO TO C9 


26 TO 31 


CA TO CF 



(A)1 30106 

Figure 8- 10. FORTRAN Execution Functional Diagram 

on LUN 0. When this message appears, the operator should ready the source 
device and then select a carriage return on LUN 0. Phase 1 then reads the 
source input and outputs an intermediate pseudo- object of tables and linkage 
information to LUN 7. If after the END statement of a subprogram Phase 1 
encounters a record containing two asterisks (**) as the first two characters, 
it produces delimiting characters for Phase 2 and restarts itself to process 
an additional subprogram. This procedure compiles several subprograms 
with a single application of the compiler. Once Phase 1 encounters an End 
of File (EOF) record (minimally a /*), Phase 1 terminates and Phase 2 be- 
gins. 

The FORTRAN compiler Phase 2 determines if the intermediate object input 
is rewindable. If the input is not rewindable, the compiler prints the mes- 
sage: 

READY INPUT, HIT C/R 

on LUN 0. When this message appears, the operator should ready the input 
device (LUN 8) if necessary, and then select a carriage return on LUN 0. 
Phase 2 then reads the intermediate object and completes the compilation 
process. If no errors occur in this process, Phase 2 prints the message: 

COMPILATION COMPLETE 

on LUN 6. 
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The object code produced by 980 FORTRAN is in relocatable format suitable 
for input to the link editor, DXOLE, The program ID for the object mod- 
ule is taken from the name of the function or subroutine subprogram. The 
name cannot exceed six characters in length. If it is less than six charac- 
ters, the name field is right filled with blanks. Those programs that are 
not identified as functions or subroutines are automatically named fcMAINp. 
DXOLE does not recognize an IDT name beginning with 16 (blank space) within 
an Include control record. Therefore, DXOLE cannot access a main pro- 
gram oroduced bv the FORTRAN compiler from within an indexed file by using 
the .keyname. 

The object output from Phase 2 is ready for linkage editing with the FORTRAN 
library to acquire any library modules referenced in the program. The 
FORTRAN library contains a collection of commonly used subprograms typi- 
cally referenced by programs generated by the FORTRAN compiler. The 
library is provided to DX980 users in the form of a key indexed library file 
identified as (SYSTEM, USRFTN). Assign this library file to LUN 9 of the 
DXOLE job step for most efficient linking. The output load module from 
DXOLE may then be executed. The FORTRAN runtime package adds a value 
of B0i£, to the LUN of all user I/O requests. For example, if a user pro- 
gram specifies an output for LUN 6, the JCL needed to execute the load mod- 
ule must assign LUN B6i£ to the program. FORTRAN runtime error mes- 
sages (explained in paragraph 8. 10. 5) are printed on LUN 0. Therefore, the 

t^t 3.,~~ r~ -~ ~,,~ ~ -,-,.(--;,-, ,-r .-,*-.-.,- XT f^\ "D T "P A M i->-».,"mt>«o tvi tnn of ^lon aocian T ,TT"N" 

J V^>J_J UrUCCUUIC 1U1 CACV-UUiiig d-J-xy J.- v/iviiuiii pj.ugj.u.i.j.1 "i""" tAj.wv i~i^w* & " — ^-. ~. 

The standard JCL procedures provided in paragraph 8. 10. 1, illustrate the 
assignment of LUN for these error messages. 

8. 10. 5 ERROR CODES 

Error messages may originate from several sources in the FORTRAN com- 
pile, link and go sequence. Table 8-22 lists the error codes generated by the 
FORTRAN compiler Phase 1. Table 8-23 lists the error codes generated by 
the FORTRAN compiler Phase 2. Table 8-24 lists the error codes generated 
by the FORTRAN runtime library. These codes can be produced during the 
actual execution of the load module. 

Table 8-22. FORTRAN Compiler Phase 1 Error Messages 



Comment 


Meaning 


Line-by-Line Messages 


SYNTAX 

NUMBER 


Erroneous punctuation or illegally con- 
structed arithmetic expression. 

A constant or label is too large or is in- 
correctly constructed. 
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Table 8-22. FORTRAN Compiler Phase 1 Error Messages (Continued) 



Comment 


Meaning 


ID CONFLICT 


The identifier marked is being used in a 




context which contradicts a previous ex- 




plicit or implicit declaration. 


TYPE CONFLICT 


The identifier or expression marked is in 




conflict with another identifier or ex- 




pression. 


MODE 


The identifier or expression marked has a 




type in conflict with the context. 


SUBSCRIPTS 


The number of subscript expressions used 




in an array does not equal the number de- 




clared for the array. 


ALLOCATION 


A non-dummy variable has been given as an 




adjustable dimension, or a variable has 




been placed in COMMON more than once, 




or a dummy variable appears in a 




COMMON or EQUIVALENCE statement. 


ORDER 


The statement appears in the program at a 




point in violation to the stated rules govern- 




ing the order of appearance of statements in 




the program. 


MISSING LABEL 


The statement must have a label in order to 




be reached or referenced. 


DATA COUNT 


The number of items in the data list of a 




DATA statement is not equal to the number 




of items in the variable list. 


BLOCK DATA 


An executable statement appears in a 




BLOCK DATA subprogram. 


OVERFLOW 


The statement caused the compiler capacity 




to be exceeded. Compilation does not con- 




tinue. 


End-of- 


Compilation Messages 


LABEL ERRORS 


Labeling a Do loop structure errors. The 




message is followed by a list of statement 




numbers. 


ALLOCATION ERRORS 


Memory allocation errors. The message 




is followed by a list of identifiers to which 




memory cannot be allocated, due to pro- 




gramming errors. 
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Table 8-23. FORTRAN Compiler Phase 2 Error/Termination Messages 



Comment 


Meaning 


INCORRECT FORMAT 
PROGRM OVER 
BSPAGE OVER 
INVALID CODE 

FIELD SIZE ERROR 

COMPILATION ABORTED - 
PASS 1 ERROR 

ERRORS - COMPILATION 
ABORTED 

PROGRAM END 
COMPILATION COMPLETE 


The Phase 1 output contains a format error 

The program exceeds Phase 2 capacity 

The base page exceeds the capacity allotted 

The Phase 1 output contains a code not 
recognized by Phase 2 

The IAL statement on the indicated line 
referenced a location that is not directly 
addressable. 

Error encountered in intermediate object 
input from Phase 1 

Errors encountered in Phase 2. 

Phase 1 output successfully input to Phase 

1 

No errors encountered in either phase | 

I 
i 



Table 8-24. Runtime Error Messages 



Message 



Meaning 



NOTE 

The user program is terminated in all cases except 
the --WARNING** condition. 



ILLEGAL FORMAT 
CHARACTER 

ILLEGAL INPUT 
CHARACTER 

FORMAT PARENTHESIS 
ERROR 

UNDER/OVER FLOW 



Illegal character encountered in runtime 
format statement. 

Illegal character encountered in input 
stream during READ execution. 

Runtime format statement contains un- 
balanced set of parenthesis. 

Real number in input stream or result of a 
floating point operation is outside range of 
numbers allowed. 



8-55 



Digital Systems Division 




943005-9701 



Table 8-24. Runtime Error Messages (Continued] 



Message 


Meaning 


**WARNING#* RECORD 


User program attempting to input or out- 


SIZE ERROR 


put record containing greater than 132 char- 




acters. 


INPUT (OUTPUT, REWIND, 


I/O was attempted on a FORTRAN unit 


BACKSP, ENDFILE) UNIT 


greater than 7. 


LIMIT ERROR 




OUT OF DATA 


End- of- file encountered during a READ op- 




eration. 


ERR, OR WRTBIN 


Hardware error, or attempted operation is 


(WRTBCD, REDBCD, 


illegal on device specified, i.e., rewind 


REDBIN, ENDFIL, REWIND, 


card punch is illegal. 


BACKSP) COMM IGND ON 




UNIT BO (1, 2, ..., 7) JOB 




ABORTED 




DIVIDE CHECK 


An attempt was made to perform a floating- 




point division by zero. 



8.10.6 SAMPLE INPUT 

Figure 8-11 illustrates input format for the FORTRAN compiler. 



/*(EOF) 




(A)1 30399 



Figure 8- 11. FORTRAN Source Input to FORTRAN Compiler 
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8.10.7 SAMPLE OUTPUT 

Figure 8- 12 illustrates output format from the FORTRAN Compiler. 



/•(EOF) 



£ 



(1701-1705 
RECORDS) 



/|DT J(JMAINfc5 

(1 7 00 RECORD) 




(A)1 30400 



Figure 8- 12. Object Module Output from FORTRAN Compiler 

8. 11 LOAD MODULE UPDATE (LMUPDT) 

This utility updates an unplanned overlay on a load module file. The new 
overlay must have been link edited as a subsystem using DXOLE. The rela- 
tive record file of the new overlay must contain a directory entry for the 
overlay, a dummy root phase, and the new overlay. Use the following con- 
trol cards for DXOLE: 



tf SUBSYSTEM OVLY 
lb ROOT MAIN. 
$ SEGMENT 1 
Object Deck 

lb SEGMENT i 
Object Deck 



Subsystem Mode, Overlay 
Dummy Root Phase 
Level 1 Overlay 
Overlay 1 
Level 1 Overlay 
Overlay 2 



(listing continued on next text page) 
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(listing continued from previous text page) 

1& SEGMENT 1 Level 1 Overlay 

Object Deck Overlay n (n Load Modules to be Updated) 

/# End of File Terminates DXOLE Input 

8.11.1 STANDARD JCL PROCEDURE 

The following listing is a standard procedure for LMUPDT: 

.# CREATE LMUPDT, COMMENT, "LOAD M DULE UPDATE ■ 

/REPLACE LMUPDT . LOAD MODULE UPDATE . 

/EXEC 0BJ«(1, SYSTEM, LMUPDT) MEM»(300. 3000, 500) PRTY»(1,1)I 



/ASSIGN 
/ASSIGN 
/ASSIGN 
/ASSIGN 
/END 



TIME--1 MEMl»MEM PRTY|«PRI TIMEl«TIM 

4 SC DEVlCEt«DMSG 

5 SC DEVICEI«DC0N FIlE»»FCoN BUFFERS«1 

6 DISCI DEVICEI«DLM FILE!«FLM BUFFERS*! 

7 DISCI DEVICEMDUPD FlLEt»FUpD BUFFERS"! 



, SYSTEM MESSAGE 

, CONTROL INPUT 

, LOAD MODULE INPUT 

. UPDATE FILE 



.# CREATE LINKUP, COMMENT, "LINK M D AND UPDATE L M FILE" 

/REPLACE LINKUP . LINK MODULE AND UPDATE LOAD MODULE FILE 

/EXEC 0BJ»(1,SYSTEM#DX0LE) MEM»(300, 12000,3000) PRTY«fl,l)f 

/ TIME*-1 MEM|«MEML 

/ASSIGN 1 DUMMY DEVlCEl»D0BJ FIlEi»F0bJ BUFFERS«2 

/ASSIGN 5 DISC! DEVICEI«DIN FILEl«FlN BUFFERS«1 

/ASSIGN 6 SC DEVICEI«DLST FlLEi«FLST BUFFERS«1 

/ASSIGN 8 DISCI FILE«(TEMP,LM) NEW BUFFERS*! RELREC LRECL»64l 

/ ACCESS»(ANY,ANYf ANY,ANY) ALLOCATE»Cl0r 300,32, 10) . 

/ASSIGN 9 DISCI DEVlCEl«DPLX FIlE«CSYsTEM,USRPLX) FlLEt'FPLXl 

/ BUFFERS«2 

/ASSIGN 10 DISCI FILE«(TEMP,SCRL) NEW DELETE BUFFERS*!; 

/ LINKSEQ ACCESS»(ANY,ANY,ANY,ANY)I 

/ ALLOCATE«(10,300,256,30) 

/ASSIGN 11 DISC! DEVlCEl«DEXT FIlE*( SYSTEM, DXEXTD) FlLEt'FEXTl 

/ BUFFERS* 1 

/ASSIGN 13 DISCI FILE»(TEMP,SCRR) NEW DELETE BUFFERS*! RELRECl 

/ ACCESS*(ANY,ANY,ANY,ANY) ALLOCATE»(l0,300,128,10)> t 

/ LRECL«100 

/EXEC 0BJ«(1, SYSTEM, LMUPDT) MEM»(300, 3000, 500) PRTY«(!,1)I 



/ASSIGN 
/ASSIGN 
/ASSIGN 
/ASSIGN 

/END 



TIME«-1 MEMi*MEMU 

4 SC DEVICEI«DMSG 

5 SC DEVICEI«DC0N SHaREI«Sc0N 

6 DISC! FILE»(TEMP,LM) BUFFERS»1 

7 DISC! DEVICEI«DUPD FlLEt«FUPD BUFFERS*! 



SECONDARY OBJ IN 
PRIMARY INPUT/CON 
LOADMAP LIST/ERR 

LOAD MOD OUTPUT 

PLEXUS LIBRARY 
LINKSEQ SCRATCH 

SYSTEM EXT DEFS 

RELREC SCRATCH 



SYSTEM MESSAGE 
CONTROL INPUT 
LOAD MODULE INPUT 
UPDATE FILE 



8.11.2 MEMORY PARTITION REQUIREMENTS 
The memory requirements for the update utility are: 

MEM=(500, 12000,4000). 

8.11.3 LUN ASSIGNMENTS 

LUN assignments for LMUPDT are given in table 8-25. 
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Table 8-25. LMUPDT Logical Unit Assignments 



LUN 


Description 


4 
5 
6 
7 


Error messages 

Control record input 

Load module input file 

Load module file to be updated 



8.11.4 OPERATION 

One control record must be input for each load module to be updated. The 
control record contains only a base 10 value of the Memory Image Phase 
(MIP) to be updated. The value is obtained from the DX980 system link load 
map listing. To find this value, scan the load map listing for the IDT name 
of the module to be updated. The base 10 value of the MIP number for this 
overlay is entered, left justified, on the control record as the base ID. 
After the updates have been made, perform the Initial Program Loading (IPL) 
procedure to bring the modified load module dictionary into memory. This 
procedure is described in the DX980 System Operation Guide , Part Number 
943004-9701. 

8.11.5 SAMPLE INPUT 

A typical format for input on LUN 5 is as follows: 
Control Record for Overlay 1 
Control Record for Overlay 2 



Control Record for Overlay n 



!■■ 



Terminates Control Record Input 



8.12 SOURCE MAINTENANCE ROUTINE (SMR) 

The DX980 Source Maintenance Routine (SMR) maintains source libraries for 
large software projects. The SMR keeps a history of changes made to a 
source library by recording the change level for each record within a pro- 
gram in the library, for each program in the library, and for the library it- 
self. The SMR can access any version (through all change levels) of any pro- 
gram in the library. It can be used for either batch or interactive applica- 
tions, and has commands that create a new program on the library, modify 
an existing program in the library, and that delete, list or extract programs 
in the library. The SMR can also produce an index of all the programs in the 
library. 
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8. 12. 1 STANDARD JCL PROCEDURE 

The following listing is a standard procedure for SMR: 

,# CREATE SMR , COMMENT, "SOURCE MAINTENANCE ROUTINE ■ 

/REPLACE SMR . SOURCE MAINTENANCE ROUTINE • 

/EXEC 0BJ«(i, SYSTEM, SMR) m£M«<300, 1 1500,5000) PRTY»(I.15)I 

/ TIME«-1 MEMt«MEM 

/ASSIGN SC DEVICE»»DMSG \ ERROR/USER MSG 

/ASSIGN 4 SC DEVICE|»DC0N FiLEl»FC0N BUFFERSM ,. CONTROL 

/ASSIGN 6 DUMMY DEVICE|»DLST FiLEl»FLST BUFFERS"! , LISTING 

/ASSIGN *i5 MTl DEVICE|«D0LD FlLEl»FOLD BUFFERS»1 LINKSEQ . OLD LIBRARY FILE 

/ASSIGN >22 DUMMY DEVICE|«DC0M FiLEl«FcOM REPLACE*«RCOMJ 

/ BUFFERS«1 LINKSEQ ACCEsS«(ANY.ANY, ANY, ANY) J 

/ ALL0CATEl«LC0M . COMPILE OUT FILL 

/ASSIGN -»25 DUMMY DEVICE|»DNEW FlLEl«FNEW REPLACEl'RNEWI 

/ BUFFERS«1 LINKSEQ ACcEsS»(ANY,ANY, ANY# ANY) ; 

/ ALLOCATEl«LNEW '. NEW LIBRARY FILL 

/ASSIGN >26 DUMMY , JCL UPDAT CON OUT 

/ASSIGN >35 DUMMY DEVICEt«DEV35 FlLEl«FlL35 BUFFERS-2 . INCLUDE t.UN OPT i 

/ASSIGN <»45 DUMMY DEVICE|»DEV45 FlLEt«FlL45 BUFFERS-2 . INCLUDE t.UN OPT 2 

/END 

8. 12. 2 MEMORY PARTITION REQUIREMENTS 

SMR memory requirements are defaulted in the standard procedure to the 

following: 

MEM=(300, 11500, 2000) 

8. 12. 3 LUN ASSIGNMENTS 

The logical unit numbers that must be assigned for SMR are provided in 
table 8-26. In addition to these standard required LUNs, any other LUNs 
can be assigned to SMR and accessed by the include option. 

NOTE 

All LUN assignments for SMR, unlike most utilities, 
are hexadecimal numbers. 

8.12.4 OPERATION 

SMR executes in either an interactive or a batch manner depending on the type 
of device used for command input. No special command is required since 
SMR determines the manner of processing from the attributes of the command 
LUN. Error processing is the main difference between the two operational 
types. When executing interactively almost no errors are fatal. The error 
message is output to the interactive device (in addition to the listing device), 
and the user can re-enter the command. When batch processing, however, 
some errors are fatal and some are logical. Logical errors allow recovery. 
See section 8. 12. 5 for a description of SMR error codes. 
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Table 8-26. SMR Logical Unit Assignments 



LUN 


Description 


Comments 





Operator Console 


Used only as explained in discussion of 




Messages 


!! . #FAUSE" command. 


4 


Command Input 


If assigned to an input/output device cap- 




(Logical /fatal 


able of printing, SMR executes in an inter- 




error messages 


£*\_, UL V C 11JLU111J.O J. « 1.X UOOlgUUU fc»\-» CfrXX IJLlp U»/" 




if interactive de- 


only device/file, SMR executes in a batch 




vice) 


manner. If assigned to DUMMY, the SMR 
assumes that the first command is 
". # UPDATE *COPYLIB". (See discus- 
sion of UPDATE mode command.) 


6 

j 
i 


Listing 


Any sequential device/file. SMR uses 
this LUN to list all submitted commands, 
for messages, and for listings of programs 
and indexes of the library as described in 
discussion of ". #LIST", M . #LSTALL", 
and ".#INDEX" commands.' If LUN 4 is 
assigned to an interactive device and LUN 
6 is assigned to DUMMY, then all messages 
and the output caused by !i . #LIST !i , 
",#LSTALL, and ".# INDEX" commands 
are written to LUN 4. Therefore, LUN 6 
may be assigned to DUMMY unless a hard 
copy of the processing performed is de- 
sired. 


15 16 


Old Library File 


Any rewindable sequential device /file. 




Must be assigned to DUMMY if OLDLIB 






is not being used. 


22 16 


Compile Output 


Any sequential device/file. This file is 




File 


the output LUN for all ". #COMPILE" 
commands and for M .#MODIFY" com- 
mands if in EXTRACT mode (as discussed 
later). 


"16 


New Library File 




Any rewindable sequential device/file. If 
running SMR in EXTRACT mode (as dis- 
cussed later), this LUN is not used and 
may be assigned to DUMMY. Otherwise 
this file is the o utput LUN when any changes 
are made to a program on OLDLIB; all un- 
modified programs are copied unchanged. 

_ 
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Table 8-26. SMR Logical Unit Assignments (Continued) 



LUN 



26 



16 



Description 



Scratch File 



Comments 



Used in JCL installation procedure only. 
LUN 26 must be assigned to DUMMY for 
general use of SMR. 



All modules that comprise a project reside in a source library (OLDLIB). 
OLDLIB is a sequential data set with rewind capability, either a linked se- 
quential file or a magnetic tape. The directory entry for each program in 
the library contains such information as module name, revision level, a 
descriptive title, a general comment field for any other information the user 
may desire to include, and the language in which the module is written (e.g. 
PLEXUS, SAP, FORTRAN, etc). All SMR commands that reference existing 
library programs read from OLDLIB, the input source library. Whenever 
a library program is to be modified or a library program added, a new 
source library data set (NEWLIB) is created. OLDLIB is not modified. 
NEWLIB is a copy of OLDLIB except for the modifications made via SMR 
commands. NEWLIB has a revision level one greater than OLDLIB and all 
programs modified have as a latest change level the revision level of NEWLIB. 

Source programs can also be copied from OLDLIB to a compile file; that is, 
a sequential file suitable for input to a compiler or assembler. The compile 
file is useful when a copy of a program is desired but no permanent changes 
are being made. 

Functionally, SMR can be operated in three modes: Extract, Update and 
Verify. The mode to be used is determined when the first command is read 
and cannot be changed after that point. The following paragraphs describe 
each of the modes. 

8. 12.4. 1 UPDATE MODE. In Update mode, SMR assumes that no output is 
to be made to the compile file. SMR reads from OLDLIB and writes to 
NEWLIB. If OLDLIB does not exist (a new library is being built), then the 
logical unit for OLDLIB (LUN 15 l6 ) must be assigned to DUMMY. When in 
Update mode, SMR requires that the programs in the library be in alphabeti- 
cal order. Whenever it adds a new program to a library, it first copies any 
existing programs from OLDLIB that alphabetically precede the new program 
(sorted by the name assigned to the program when it was created in the li- 
brary). Furthermore, all SMR commands that reference programs in 
OLDLIB must reference those programs in alphabetical order. Any pro- 
grams in OLDLIB that are not specifically referenced in the command are 
copied to NEWLIB unaltered. If a program is referenced out of order, SMR 
will search to the end of OLDLIB without finding the program and will not 
rewind OLDLIB to find the program (rewinding OLDLIB would create multi- 
ple copies of programs from OLDLIB in NEWLIB). 
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8. 12.4.2 VERIFY MODE. When operating in Verify mode, SMR assumes 
that no output is to be made to the compile file. NEWLIB may not be as- 
signed to DUMMY. This mode verifies that a new library (NEWLIB) was 
generated without I/O errors. SMR commands operate the same in this 
mode as in Update mode, except that SMR does not write to the output li- 
brary, NEWLIB. Instead, SMR reads NEWLIB and compares it to verify the 
contents of the record. 

8. 12.4. 3 EXTRACT MODE. In Extract mode, SMR assumes that no new 
library is being created. All commands, except .# CREATE and 
.# DELETE, have meaning as discussed later in this description. Refer- 
ences to programs in OLDLIB do not need to be in alphabetical order since 
SMR rewinds OLDLIB to search for the programs when in Extract mode. 
However, SMR is more efficient if references are alphabetically ordered. 

8. 12.4.4 SPECIFYING UPDATE MODE. To use the Update mode, the 
first command to SMR must be one of the three following commands: 

.# UPDATE 

. # UPDATE *COPYLIB 

.# UPDATE *DH*'<rl>'. 

The first command (.# UPDATE) activates the Update mode as previously 
described with no modifications. 

The second command (.# UPDATE *COPYLIB) instructs SMR to copy 
OLDLIB without changes to NEWLIB. Specifying this option prevents SMR 
from incrementing the library revision level, and produces an exact dupli- 
cate of OLDLIB in NEWLIB. This option replaces the DXCOPY utility for 
copying SMR libraries since DXCOPY cannot handle the large size logical 
records (up to 3600 characters) that SMR writes. If the command input de- 
vice (LUN 4) is assigned to DUMMY, then SMR assumes that the first input 
command is . # UPDATE *COPYLIB. If the *COPYLIB option is specified, 
SMR does not request further input. 

The third command (.# UPDATE *DH*'<rl>'.) instructs SMR to Destroy 
History. The symbol < rl > represents a 2-character code supplied by the 
user for a revision level indication. The command must appear exactly as 
it is shown to correctly specify the Destroy History option. When SMR re- 
ceives this command, it does not write any record onto NEWLIB that was 
deleted previous to the specified revision level (<rl>). Refer to the discus- 
sion of . #MODIFY and . # DELETE commands for an explanation of the de- 
leted records. 
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8. 12.4. 5 SPECIFYING VERIFY MODE. To use the Verify mode, the first 
command to SMR must be one of the three following commands: 

.# VERIFY 

.# VERIFY *COPYLIB 

.# VERIFY *DH*'<rl>'. 

The options in the above commands are the same as those previously de- 
scribed for the . # UPDATE command. To run SMR in the Verify mode, use 
one of the . # VERIFY commands as the first command. Any options used in 
this command must be the same options as specified in the . # UPDATE com- 
mand used to create the NEWLIB that the command is verifying. Following 
the initial command should be the same sequence of commands that followed 
the . # UPDATE command (excluding the . # UPDATE command). Similarly, 
the LUN assignments for OLDLIB and NEWLIB should be exactly the same 
as those used to create the NEWLIB. 

8. 12.4.6 SPECIFYING EXTRACT MODE. To specify Extract mode, the 
first command may be any valid , | xxxx command except those commands 
used to specify the Update and Verify modes. The following two commands 
specifically designate the Extract mode: 

.# EXTRACT 

. # EXTRACT *SEQ 

The term, *SEQ, specifies a sequencing option used with the . #LIST, 
. # LSTALL, and . # MODIFY commands. Refer to the discussion of the 
.# LIST command for a description of this option. 

8. 12. 4. 7 CREATING A NEW MODULE ON NEWLIB. The command to 
create a new module on the new library tape is: 

. #CREATE<name>, <language>, <title>, <comment>. 

The user specified fields are defined as follows: 

• <name> - name to be assigned to the module. This is the name used 
to reference the module in any other command. Limited to 9 char- 
acters. 

• <language> - source language of the module. 
Languages recognized include: 

a) SAL - 960 Assembly Language Source 

b) SAP - 980 Assembly Language Source 

c) OBJECT - Object Decks 

d) FORTRAN 
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e) FORT - Alternate Identifier for FORTRAN 

f) COBOL 

g) XPL 

h) PLEXUS - Specifies PLEXUS language 

i) PL1 - Specifies PL/I language 

j) ASM - S/360 Assembly Language Source 

k) ALGOL 

1) COMMENT - module containing USASCII source records for 
comment only. 

• < title > - a quoted string, limited to 36 characters, that provides a 
more descriptive title than the 9 -character name. 

• <comment>- a quoted string, limited to 20 characters, that can 
hold any additional information such as programmer, author, pro- 
ject name, etc. 

When the CREATE command is invoked, all programs in OLDLIB (if any) 
that alphabetically precede the current program are first copied to NEWLIB. 
If a program with the specified name already exists in OLDLIB an error is 
declared. The commands that follow this command normally define the de- 
sired contents of the new module. Two different commands can follow a 
.# CREATE. They are: 

1) . /INCLUDE <lun>,<lun>, .. . 

Includes 80 character records (64 if the specified language name is 
OBJECT) from the specified <lun> until an end-of-file is read. 
The<lun>is not rewound before input. A .# REWIND command 
should be used to rewind the<lun> if desired. More than one 
. /INCLUDE command may be used. The <lun> may be a decimal 
number, or a hexadecimal number prefixed by a n >" (greater than) 
or a M # " (pound sign). Any number of<luns> may be specified. If 
the language name is OBJECT, the contents of the module must be 
inserted using . /INCLUDE commands since no object records may 
be encountered in the command input stream. 

2) Any record from the command input stream that does not have a 
'.#' or './' in column 1 and 2 is interpreted as part of the module 
definition. The definition is completed with either another . # com- 
mand or an end of file in the command input. 

8. 12.4.8 MODIFYING A PROGRAM ON OLDLIB. The command to begin 
modification of a program on OLDLIB is: 

.# MODIFY <name>. 

or 

. # MODIFY < name >,< language >,< title >, < comment >. 
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The <name> field represents the name of the program to be modified. If the 
program is not defined on OLDLIB, an error condition exists and the com- 
mand is terminated. The < language >,< title >, and < comment > fields are op- 
tional. They need only be supplied to change those fields on the program 
header record that SMR maintains for the program and that are displayed 
for each program when a . # INDEX command is processed. If any one of 
these three fields is specified, then the field (or fields) preceding it must 
also be specified. For example, to change the title, the . #MODIFY com- 
mand must specify the name, the language and then the title. 

If in Update mode, then the resulting program image is written on NEWLIB. 
If in Extract mode, the resulting program image is written to the compile 
file. When the . # MODIFY command is invoked in Update mode, all pro- 
grams in OLDLIB that alphabetically precede the specified program are first 
copied to NEWLIB. More commands are then input to define the new pro- 
gram contents. Four different commands can follow a .#MODIFY corn- 
are: 

1) @ NNNNN. 

This command is the Insert After command, This command copies 
from OLDLIB all records in the program up to and including record 
number NNNNN. The number, NNNNN, should be a decimal num- 
ber (leading zeroes not required). (The .# LIST command descrip- 
tion discusses sequenced listings of a program in OLDLIB. The 
sequence numbers given by such a listing are the appropriate num- 
bers to use for NNNNN.) When the records have been copied (to 
NEWLIB if in Update mode or to the Compile File if in Extract mode) 
then a new command is read to continue defining the new program 
contents. 

2) ©NNNNN, MMMMM. . 

This command is the Delete Records command. This command per- 
forms the following functions: 

• Copies all records of the program from OLDLIB up to and in- 
cluding record number NNNNN- 1. 

• If in Extract mode, it reads and discards all records up to and 
including record number MMMMM from OLDLIB. 

• If in Update mode, it reads and marks as deleted (at the revision 
level of NEWLIB) all records up to and including record number 
MMMMM and then writes the records to NEWLIB. SMR does 
not delete these records; it only marks them 'deleted'. In this 
way SMR can reproduce the image of a program in the library 
exactly as it appeared at any previous revision. 
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./INCLUDE <lun>,<lun>, ... 



This command operates the same as explained in the discussion of 
the . #CREATE command. 

4) Module Definition. 

Any record from the command input stream that does not have an 
"@" in column 1, or a ".#" or ". /" in columns 1 and 2 is inter- 
preted as part of the module definition. It is inserted into the com- 
pile file or NEW LIB immediately. The module uciimtion is com- 
pleted when either a ".# " command or an End-of-file is encountered 
in the command input stream. 

If an "@NNNNN. " command is encountered after record NNNNN+ 1 has been 
read from OLDLIB, then an error message is output and the command is ig- 
nored. Similiarly, if a "@NNNNN, MMMMM. " command is encountered after 
record NNNNN has been read from OLDLIB, then an error message is given 
and the command is ignored. 

If in Extract mode and the "*SEQ" option was specified in the ".# EXTRACT" 
command, then columns 73 through 80 of the record are modified before being 
placed in the Compile File. The modification is as follows: 

1) If the record was not previously in OLDLIB (inserted into the com- 
mand stream or via a !! . /INCLUDE" command), then columns 73 
through 80 are blanked. 

2) If the record was in OLDLIB previously, then columns 73 and 76 
are blanked, columns 74 and 75 contain the 2- character revision 
level that represents the revision level of the library when the rec- 
ord was added, and columns 76 through 80 contain a 4- digit (decimal) 
sequence number. 

8. 12.4. 9 COMPILE. The format of this command is: 

/ <name> \ 
.# COMPILE I * ' [ • 

( /* ) 
This command moves records to the compile file when no editing is required. 
Only one of the three options may be specified. If not in Extract mode, then 
use of the "/*" option causes the command to be ignored and use of either 
<name>or * options produces a logical error message output and the com- 
mand is then ignored. 

The user supplied parameters are interpreted as follows: 

• <name> - Name of a module to be copied from OLDLIB to the com- 
pile file. 
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• * - Records are to be copied directly from the command input into 

the compile file until a ".#" command or an end of file is encountered, 

• /* - Write an end of file in the compile file. An end of file is auto- 
matically written on the compile file when SMR terminates. This 
command permits the user to build compile files with more than 
one end of file. 

To obtain a copy of a module in OLDLIB as it was at a revision previous to 
the current revision of the module, a second option may be added to the 
< name > option as follows: 

. # COMPILE <name>, *'<rl>'. 

The notation < name > is the name of the module and<rl> represents a 2- 
character revision code for the desired revision level. The allowed revision 
character codes with interpretation are: 

** = 
*A = 1 



*Z = 26 
AA = 27 

AZ = 52 

ZZ = 702 

The * and quote marks are required to correctly specify the revision level 
option. 

8. 12.4. 10 DELETE. The command for designating modules as deleted 
from the library is: 

. # DELETE < name>, <name>, . . . 

If in Extract mode, this command is ignored. Otherwise, each module 
named is located in OLDLIB and then the header record is marked "deleted". 
After marking the header record, SMR marks all previously non-deleted rec 
ords as being "deleted" at the revision level of NEWLIB. All records (in- 
cluding the header record) are copied to NEWLIB. This "deletion" prevents 
the module name from appearing when an Index (as discussed later) is done. 
All subsequent references to the module name result in an error unless the 
command that references the module name also contains the necessary op- 
tions to specify that the revision level desired is previous to the "deletion" 
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of this module. However, if a . # CREATE command is later used and the 
name given matches the name of a previously deleted module, then the header 
record and module name are reactivated, all the previously deleted records 
are copied, unaltered, to NEWLIB, and then the next command is read to 
start defining the module's contents. The source language of the new module 
must be OBJECT if and only if the source language of the old module was 
OBJECT. 

8 1? A. 11 T .T.CJT TV.O rnmmanrl f r\ r liefinry p likvpv,: w,^^.,1~ 1 « . 

W» ■■■—• i • -■..■■ J_fJ-V_» -i . J-iiV- V, Uiiii.iiU.iiVt i.v^jL ilDl.lli{; d. J. 1 u X IJ. J. V ±±±\J\JL\AJ. C i- O . 

. #LIST < name>, <name>, . . . 

This command lists the source records in the modules specified. The mod- 
ules referenced must always be on OLDLIB. If in Extract mode and the 
"*SEQ" option was given on the ". # EXTRACT" command, then columns 73 
and 76 are blanked, columns 74 and 75 have the 2- character code for the 
revision level of the module when the record was created, and columns 77 
through 80 contain a 4-digit (decimal) sequence number. 

To get listings of certain modules as they appeared at a revision previous to 
their latest revision, the revision level may be specified as in the following 
example: 

. #LIST NAME1, *'#A', NAME2, NAME3, *'BZ', NAME4, *,'**'. 

This example generates a listing of: 

1) Module NAME1 as it appeared at revision *A 

2) Module NAME2 as it appears at the current revision 

3) Module NAME3 at revision BZ 

4) Module NAME4 at revision ** (when the library was first created. 

8. 12.4. 12 LIST ALL, The command for listing all modules in OLDLIB 
(except those with source language OBJECT) is: 

. #LSTALL. 

This command is invalid unless in Extract mode. Every non-OBJECT mod- 
ule in OLDLIB will be listed on LUN 6. However, if LUN 4 is assigned to an 
interactive device and LUN 6 is assigned to DUMMY, the listing appears on 
LUN 4. The *SEQ option on the . # EXTRACT command has the same effect 
when the . #LSTALL command is used as for the . #LIST command. 

8. 12.4. 13 REWIND LUN, The command to rewind one or more logical 
units is: 

. # REWIND < lun>, < lun>, 
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The notation may be a decimal number, or a hexadecimal number prefixed by 
a '>' or a '#'. This command can be used to rewind a< lun > referenced in a 
. /INCLUDE command. 

8. 12.4. 14 INDEX. The command for listing a library index is: 

. # INDEX 

The . # INDEX command lists on LUN 6 a catalog of all the modules on the 
library tape. However, if LUN 4 is assigned to an interactive device and 
LUN 6 is assigned to DUMMY, the listing appears on LUN 4. If the 
. #INDEX command is input after records are written to NEWLIB, then 
the new library will be indexed when the . #ENDALL command is entered to 
terminate SMR. Two possible options may be specified with the . #INDEX 
command (but only one at a time). The first: 

. #INDEX * , <rl>' 

causes SMR to produce an index of the library as it appeared at the revision 
specified by the 2-character revision code represented in the example by <rl>. 

The second: 

. # INDEX *TH (Note the lack of quotes) 

causes SMR to produce a listing of the library header records for all pre- 
vious revisions of the library (beginning with the most recent and going back- 
wards). This option is useful if the library header information has been 
changed in previous revisions via the . #TAPE command. 

8. 12.4. 15 TAPE. The command for creating a library header record is: 

. #TAPE '<title>', ! <part number>', '<date>', *'<revision level>'. 
The user specified fields are defined as follows: 

• <title>- a quoted string, limited to 26 characters, that is the name 
of the source library. 

• <part number >- a quoted string, limited to 12 characters, to be 
used to document the part number the source library was released 
under. 

• <date>- a quoted string, limited to eight characters, used to docu- 
ment the date the source library was generated. 

• <revision level> - a quoted 2-character string indicating the revision 
level of NEWLIB.. If not specified, NEWLIB will have a revision 
level which will be the next sequential alphabet character; i.e. *B if 
OLD LIB was *A. 

The ,#TAPE command is optional and need only be specified the first time 
that a new library is generated or to change the title, part number, or date on 
the library header record for the next revision of the library. This command, 
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if used, may be preceded only by . #PAUSE, .# INDEX, .# UPDATE, and 
.# VERIFY commands. 

8. 12.4. 16 PAUSE. The command to write a message to the operator's 
console is: 

. #PAUSE'<message>'. 

This command writes the quoted string on LUN 0. Processing is continued 
when a response (carriage return or end of file) is entered on LUN 0, 

8. 12.4. 17 ENDALL. The command for terminating SMR is: 

. #ENDALL 

An end of file on LUN 4 also terminates SMR. If a • #INDEX of NEWLIB has 
been specified, it is processed when the copy from OLDLIB to NEWLIB is 
completed. 

8. 12.5 ERROR CODES 

Error codes for SMR are output to the listing device (LUN 6) and in the inter- 
active mode, to the interactive command device (LUN 4) as well. In the in- 
teractive mode, only two errors are considered fatal. Unlimited user retry 
is normally allowed. In the batch mode, errors are classified as fatal, (i.e. 

-< l^r^ v.4-5 tro 4-/-\ 4-T-i a i/"vl~>\ r\y 1«"\i-yi/-»o1 l\ o r-» v» r\ rt v» ex rv^i v* a r- r\ trora V»1 <a\ T v^ nri r> a 1 ay r» r\y a 

O, LJ\J J. Ill V <= t,\J 1-111/ J\J u f w X. JLVSg J. v«u>.l ^l| U| ^»j.^gj.l*ixi j.^^v^yv/J.<-* >-rJ- ^ / . j_i V glvi»i ^ J. j. v^ j. ._> 

for batch mode include invalid LUN, missing arguments, unmatched quota- 
tion mark, etc. In these cases the field is either skipped, assumed to be a 
blank, or assumed to be terminated by quotation mark in column 81. 

The two fatal errors for both SMR batch and interactive modes are: 

• Specifying Update or Verify mode with NEWLIB assigned to 
DUMMY. 

• Specifying (or defaulting to) Extract mode with OLDLIB assigned to 

DUMMY. 

The two fatal errors for SMR batch mode are: 

• Referencing a file name that does not exist in the old source library 

• Exceeding 100 logical errors. 

8. 12. 6 SAMPLE OUTPUT 

The following paragraphs contain examples of the use of SMR. 
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8. 12. 6. 1 CREATING A NEW LIBRARY TAPE IN BATCH MODE. The JOB 
and RUN commands for this execution are: 

/JOB S SYSTEM 

/RUN SMR DOLD=DUMMY DNEW=MT1 DCON=CRl; 

/DMSG=SC DLST=LP1 DCOM=DUMMY. 

The control cards and statements defining the modules are shown in figure 
8- 13. Figure 8- 14 shows the index of NEWLIB at the termination of SMR. 

SOURCE MAINTENANCE ROUTINE 

••UPDATE 

,#TAf»E 'SMR EXAMPLES', ' 123456-7800 ', '04/10/75' ,*»** ' 

.♦CREATE EFF33U,F0RTRAN,'CQMPUTF DS330 DISC EFFICIENCY'. 

WRITE(6,30K) 
300 FGRMATCiHl,3X»l3HREC0RDS/TRACK,4X,14HSECT0RS/FEC0RD, 

1 2X,12HW0RDS/REC0RD,2X,18HUSEFUL WARDS/TRACK, 

2 2X,10HEFFICIENCY) 
DO 100 ISECR « 1,88 

WC ■ (USECR*l22l # 0*677. 05*32,05/(34, 0*16. 05 
IWRDR ■ NC/32 
IWRDR ■ 1NRDR*32 
IRECT ■ 88/I8ECR 
IUSWT « IRECT*IWRDP 
EFF« CIUSWTMOtf. 05/6720,0 
100 WRITE(6,2005IRECT, ISECR, IKRDR,IH8WT,EFF 
200 FCRMATC1H ,/,9X, 15, 10X, 15, 10Y,I5, 13X,I5,9X,F8.2) 
STOP 
END 
.♦CREATE SMREXAMPLE, COMMENT, »3MP EXAMPLE * 2 ',»N0 COMMENT' 
THIS IS ORIGINAL RECORD * 1 
THIS IS ORIGINAL RECORD # 2 
THIS IS ORIGINAL RECORD # 3 
THIS IS ORIGINAL RECORD • 4 
THIS IS ORIGINAL RECORD * 5 
THIS IS ORIGINAL RECORD # 6 
THIS IS ORIGINAL RECORD * 7 
THIS IS ORIGINAL RECORD * 8 
THIS IS ORIGINAL RECORD # 9 
THIS IS ORIGINAL RECORD * 10 
.•INDEX. 

FLAG SET TO INDEX NEW LIBRARY 
.«ENDALL. 

Figure 8- 13. SMR Batch Input to Create a New Library 



PART NO, ■123456*7890 REV*** DATE«*4/10/75 TITLEfSMR EXAMPLES 

NAMfc RLV LANG TITLE COMMENT 

EFF33B ** FORTRAN COMPUTE DS33<* DISC EFFICIENCY 

SHRIXAMPL ** COMMENT SMR EXAMRI E * 2 nO COMMENT 

2 FILFS ON NEW LIBRARY 

Figure 8- 14. Index of NEWLIB 
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8. 12. 6. 2 GETTING A SEQUENCED LISTING OF A MODULE. Figure 
shows the commands entered to get a sequenced listing of a module in 
OLDLIB and the resulting list. The JCL to run SMR for this example is 

/JOB S SYSTEM 

/RUN SMR DNEW=DUMMY DOLD=MTl 

/DCON=SC DLST=LP1 DCOM=DUMMY 

PART MO.«123456«7890 REV«** DATE«*4/i0/7b TITLE-SMR EXAMPLES 

.♦EXTRACT *SEQ 
,#LIST SMREXAMPLE . 



!-15 



NAME 



REV LANG 



TITLE 



3MREXAMPL ** CUMMENT SMR 


EXAMPLE 


; * 2 


THIS IS ORIGINAL 


RECORD 


* 


i 


THIS IS ORIGINAL 


RECORD 


# 


2 


THIS IS ORIGINAL 


KttL'RP 


# 


J 


THIS IS ORIGINAL 


RECORD 


* 


4 


THIS IS ORIGINAL 


RECORD 


# 


5 


THIS IS ORIGINAL 


RECORD 


# 


6 


THIS IS ORIGINAL 


RECORD 


# 


7 


THIS IS ORIGINAL 


RECORD 


* 


6 


THIS 18 ORIGINAL 


RECORD 


* 


9 


THIS TS ORIGINAL 


RECORD 


* 


10 



.#ENDALL 



COMMENT 
NO COMMENT 



0P01 

0002 

0*9 1 
r •>«* 

0004 

0005 

0006 

0007 

0008 

0009 

0010 



Figure 8-15. Sequenced Listing Commands and Listing 



8. 12. 6. 3 ADDING A MODULE TO GET A NEW LIBRARY. Figure 8- 16 
shows the command input stream used to add two modules to the library. 
Figure 8- 17 shows an index of the new library. Note that the modules have 
been inserted in alphabetical order. 

8. 12.6.4 MODIFYING A MODULE. Figure 8-18 shows the command input 
stream to modify a module in the library. Figure 8- 19 shows an Index of 
the new library generated. 

8. 12. 6. 5 THE SEQUENCED LISTING OF THE MODIFIED MODULE. Fig- 
ure 8-20 shows the command input stream used to get a sequenced listing of 
the module modified in example 8. 12.6.4, as well as the sequenced listing 
of that module. 
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PART *O.»123456.7890 REV'** DATE»*4/10/75 TITLMSMR EXAMPLES 



,#UPDATE . 

,#CREATE EDITOR, PLEXUS, 'CHARACTER EDITOR PROGRAM!. 
/* $C $S JH SA */ 
DECLARE EDITOR PROCEDURE CHARACTER, 

CINSTRN,0T3TRN#NWSTR*) CHARACTER C8§ ) 9 
INSTRN ■ • «J 

DO NHJLE SUB3TR(INSTRN,1,?) *• 'SS'I 
INSTRN ■ INPUT? 

NWSTRN ■ EDIT0R(INSTRN, , JLD'.'JLX , )> 
OUTPUT » NWSTRNJ 
ENDI 
EOIToRl PROCEDURE (INSTRING, VICTI M , VICTOR) I 

DECLARE (INSTRING,RESULT) CHARACTERC80) , 
CVICTIP, VICTOR) CHARACTER, 
I FIXED(1«)I 
RESULT « INSTRINGJ 
I ■ 01 

DO WHILE K«(LENGTH(INSTRTNG) *> LEKGTH(VICTQR)) % 
IOCLENGTHCIN8TRTNG) - LEKGTH(VICTIM)) & 
CI < 100)1 
IF VICTIM • SURSTR(!NSTRING,I,I*LENGTHCVICTIM)5 THEN 
RESULT ■ SU8STP(IMSTRING,0,I)tlVICTORn 

SUaSTPCIMSTRING,I*LENGTH( VICTIM)) | 







I » I ♦ 11 






ENDI 




RETURN RESULTI 


END EDITOR* 


EOF 






.♦CREATE SEEK, SAP, '0333P INDEPE^DEMT SEEK TEST', 




IDT 


ISTKST 




HED 


DS330 INDEPENTCNT SEEK TEST 


SVC 


OPD 


>C360,3 


START 


EQU 


S 


CK1 


EQU 


S 




TMBZ 


BU8Y#PRBl 




BRU 


CK? 




BRU 


RBUF1 


CK2 


EQU 


8 




TMBZ 


BUSY,PRB2 




BRU 


CK1 




BRU 


RBUF2 


RBUri 


8MBZ 


WRITE, PRBi+i 




OLD 


PRBi+4 




DAD 


INC 




D8T 


PRB1-M 




#LDM 


■ PRBI 




BRU 


GO 


RBUF2 


8MBZ 


WRITE, PRB2-M 




DLD 


PRB2+4 




DAD 


INC 




DST 


PRB2+4 




#LDM 


iPRB2 


60 


SVC 







BRU 


CKi 


PRBi 


DATA 


9,>8017,32,BUFW0^0 


WRITE 


EQU 


15 


BUSY 


EQU 





INC 


DATA 


0*88 


PRI2 


DATA 


6,>8017,32,BUF2,0,88 


iUPl 


BSS 


32 


BUPS 


BSS 


32 



END START 
.♦INDEX , 

FLAG SET TO INDEX NEW LIBRARY 
,*ENDALL 

Figure 8- 16. Input Stream to Add Two Modules 
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PAWT Mfj, el 2?45h»7B ! 5" RFV«*-* P ATpat* -*/ 1 $ / ?* TITLFiSHP FKAMPI.FS 



MAhF PFV L*wr. TITLF PnwMFWT 

£n I TOP ** PLEXUS CWAPATTFP FPTTdtf P»n(S«A^ 

EFM3* ** FfiwTPAi" CnMPtiTE nS33« HTSr FFFTrTFNjTY 

SFEK ** SAP DS333 T^'OFPFNOF*'! SFE* TFST 

SMHFXAMPL ** mMHFNT S*« E^AMPIP * ? *!0 CflMHFWT 

4 F T L F S *> ^■F ut ! T P K * W Y 

Figure 8- 17. Index of NEWLIB with Added Modules 



PART NQ.«123456.-7890 REV»*A PATE»fl4/i0/79 TITLE«SMR EXAMPLES 

,#UPDATE 

.♦MODIFY SMREXAHPLE 

THIS IS NEW RECORD * i 
•5 

THIS IS NEW RECORD * 5*A 

THIS IS NEW RECORD # 5»B 
• 7,9 

THIS IS NEW RECORD 7-A 
•»7FFF 

THIS IS THE NEW LAST RECORD 
••INDEX 

FLAG SET TO INDEX NE* LIBRARY 
•#ENDALL 

Figure 8- 18. Input Stream to Modify a Module 



P4WT KH.il ?34^*«71QP »FVi*« n ATE «C* / 1 P /?■> TfTLFisrw FiA*hLFS 



>JA*F KfV l**r, TITLF mMWFNT 

F.P»lTfJw ** PLFXIIS CKAPAPTFR EHITflP PR^G^A" 

FPFV3'* ** Fn«TTAt" CnMP L |TF 0*33« m$r FFFirTFNfV 

SFfc* ** SAP n*33fl T fc, DFPtMnFv7 spe« TE^T 

SMkPXAMPL * B rnwMiffjT S"W F*A M PIF * ? *0 cn**F kl T 

4 F TLFS U*< »-EW I. TP.RARV 



Figure 8- 19. Index of Modified Module 

8. 12. 6. 6 DELETING A MODULE. Figure 8-21 shows the command input 
stream to delete a module. Figure 8-22 shows an index of the new library- 
generated. This index was generated in a separate run of SMR. 
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PART *O.»123456»7890 REV««B OATE«*4/10/75 TITLE-SMR EXAMPLES 

.♦EXTRACT *SEQ 
,#LIST SMPEXAMPI.E 



NAME 



REV LANG 



TITLE 



SMREXaHPL *B COMMENT SMR EXAMPLE * 2 

THIS IS MEw RECORD * 1 

THIS 18 ORIGINAL RECORD « 1 

THIS IS ORIGINAL RECORD * 2 

THIS IS ORIGINAL RECORD # 3 

THIS IS ORIGINAL RECORD # A 

THIS IS ORIGINAL RECORD * 5 

THIS IS NEW RECORD # 5*A 

THIS IS NEW RECORD * 5»B 

THIS IS ORIGINAL RECORD # 6 

THIS IS NEW RECORD 7-A 

THIS IS ORIGINAL RECORD « 10 



.OENDALL 



THIS IS THE NEW LAST RECORD 



COMMENT 
KO COMMENT 



♦ B 0001 
*• 0002 
** 0003 
** 0004 
*♦ 0005 
** 0006 

• B 0007 
*B 0006 
** 0P09 
*B 0010 
** 0P11 
*B 0012 



Figure 8-20. Sequenced Listing of Modified Module - 
Input Commands and Listing 



PART *O.*123456»7890 REV«*U DATE«*U/10/75 TITLE«3MR EXAMPLES 

.♦UPDATE 
.•DtLETE EDITOR 
,*ENDALL 



Figure 8-21. Input Stream to Delete a Module 



P»*T » , n.«t?J4*5-7'*Q? RPV«#r P4TF«pt4/ipi/7^ TITLF«**P F**MPLFS 



NA«F 



PFv \_kKr, 



TITLF 



rn««M)r|gT 



EFF*3i *♦ FOPTCA^ CPMPilTF 0533PI DTSf FFFirTFfcfV 

SFfcK *k %kP 0*33* I^OFPFn^Fk'T SFE" TEST 

Sm»FX*mPL *P ro^MFNT S"R EXAMPLE * 9 MH COMMFNT 

3 FTLFS 0*' KEi I IPf?ARY 

Figure 8-22. Index of NEWLIB without Deleted Module 
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8. 13 LINKABLE PARTS FILE BUILD UTILITY (LPFBLD ) 

The LPFBLD utility maintains a key indexed file of 980 object records. Each 
object deck in the file has a key equal to the IDT name with all of the object 
records for that program sequentially linked to the key. LPFBLD can be used 
to modify, extract, or delete members of a linkable parts file. LPFBLD cre- 
ates a key of the program if added to the file and replaces the old object if the 
IDT name already exists as a key. 

LPFBLD is useful for building an object file for input to the DX980 link editor 
(DXOLE) . To retrieve an object deck from the key indexed file, use the 
DXOLE include with key option (i.e. INCLUDE 20(IDTNAM)). Using DXOLE 
and LPFBLD together in this manner allows easy manipulation of object files 
and easy retrieval for link editor input. 

8.13.1 STANDARD JCL PROCEDURE 

The following listings are standard procedures for LPFBLD. The first is for 
a single step job executing LPFBLD. The second is for a two step job per- 
forming an assembly of the module and including this assembled module in 
the library file. 



.« CR 
/REPL 
/EXEC 
/ 

/ASSI 

/ASSI 

/ 

/ASSI 

/ASSI 

/ 

/ 

/ASSI 

/ 

/ 

/ 

/END 



feATE LPFBLL.CnMKENI, "UPDATE LINKABLE PARTS FILE M 
ACE LPfPLH . UPDATE LINKABLE PARTS FILE , 
0BJ«(1 ,SYSTE*, LPFBLD) M£Ma (3fl&,33Pfl, IPflP) PRTY«(t,23J 
TIME"-! DBJiaDBJ ^E^t«MEM 
GN P» DUHhY HEVlCE:«nC0N . CONTROL 

GN 5 DISCI neviCEl«0()BJ FlLE«fLStRP»l ,ASM0!JT) FILEl"F0BJJ 

. OBJECT INPUT 



GN 
GN 



GN 



nisei neviCEi«0()Bj 

BLlFFERSsl 

SC DEVICEJbDLST 

niJMHY DEVTCEl«0EXT 



FIIEI«FEXT REPLACEHREXTJ 
BUFFERS"! IINKSFO ACCESS* ( ANY , CRE AT , CREAT ,CRE AT) t 
ACCESS:«CFXT ALL0CATE«(l,tt,t2B,2&O ALLOCATE ! "LEXT , 
9 DISCI DfcVlCEt«nt!Pn FlLEl'FltpD REPLACE : "RUPDf 
BIIFFEKS«2 INDEXED ACCESS* (CRE AT . CREAT , CRE AT , CREAT) I 
ACCESSI-CUPD ALLUCATE«(t,P, 256, !*) ALLOCATE ! »LUP0 r 
KEYl ENrng . 



LISTING 



EXTRACT FILE 



UPDATE FII E 



,# CREATE A3MUP .COMMENT, "ASSEMBLE MOO AND UPDATE LPF » 
/REPLACE ASMUP . ASSEMBLE MODULE AND UPDATE LPF , 
/EXEC 0BJ«(1, SYSTEM, ASM8LR) MEM"(300, 6000, 2000) PRTYpM.2)| 
/ TIME"-! MEMt*MEMA 

DUMMY DEVZCEt'DMSG 
DUMMY DEVICEI-DCON 

DISCI DEVICEUDSRC FILEi«F8RC BUFFERS«1 
SC DEVICEl«DLSTA FILEl-FLST BUFFER8»1 
DISCI PILE«(TEMP, OBJECT) NEW BUFFERS«1 LINK8EQI 
ACCESS" (ANY, ANY, ANY, ANY) ALLOCATE" (10,300, 64, 20) 



/ASSIGN 
/ASSIGN 
/ASSIGN 
/ASSIGN 
/ASSIGN 

/ 

/ASSIGN 16 0ISC1 FILE"(TEMP.SCRL) NEW DELETE BUFFER3«1f 

/ 
/ 



LINKSEQ ACCE3S«(ANY,ANY.ANY.ANY)I 
ALLOCATE" (10, 300, 256, 30) 



/EXEC 0BJ"(1, SYSTEM, LPFBLD) MEM«(300, 3300, 1000) PRTY"fl,2)| 



/ASSIGN 

/ASSIGN 

/ASSIGN 

/ASSIGN 

/ 

/ 

/END 



TIME"»l MEM|"MEMU 
DUMMY DEVICE I"DC0N f 

5 DISCI FILE"(TEMP,OBJEct) BUFFERS"1 r 

6 SC DEVICEl"DLSTU FlLEt"FLST BUFFERS»1 , 
9 DISCI DEVICEI"DUPD FILE|«FUPD REPLACEl"RUPn§ 

BUFFERS«2 INDEXED ACCESS* (CREAT, CREAT, CREAT, CREAT)! 
ACCESSt«CUPD ALLOCATE|"LUPD KEYLEN"6 



SYSTEM MESSAGE 
CONTROL/MESSAGE 
SOURCE INPUT 
SOURCE LIST/ERROR 

OBJECT OUTPUT 



SOURCE SCRATCM 



CONTROL 
OBJECT INPUT 
LISTING 



UPDATE FILE 
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. 13. 2 MEMORY PARTITION REQUIREMENTS 

The memory allocation parameter for LPFBLD should be: 

MEM=(300,3300, 1000). 

The job extension parameter is dependent upon the blocking factors and the 
number of buffers assigned for the LUNs, but 1000 words is adequate for 
most files. 



8. 13. 3 LUN ASSIGNMENTS 

The logical unit assignments for LPFBLD are given in table 8-27. Figure 
8-23 illustrates the linkable parts file (LPF) built on LUN 9. 

8.13.4 OPERATION 

LPFBLD first reads a control record from LUN 0. The control record deter- 
mines the mode of execution. Mode 2 is the default LPFBLD mode of execu- 
tion. 

MODE 1: The control record of 'CRtftf' implies all of the old keys and data 

are deleted from fhe linkable parts file. Then processing continues 
the same as in Mode 2. 

MODE 2: The control record of 'MOD#' or an end of file (from DUMMY) mod- 
ifies only those modules input from LUN 5 either by replacing the 
old object, or by creating a new key and inserting the new object. 
The new object is reformatted and output to LUN 9. 

MODE 3: The control record of 'EX##' implies that the object for members 
of the linkable parts file assigned to LUN 9 is to be output to LUN 7 
as a sequential file. The names of the modules to extract should 
start in column 5 of the control command and be separated by com- 
mas. The first blank column terminates the scan for member 
names. A control card cannot be continued but multiple control 
commands may be entered. An end of file or a control record 
other than 'EXtftf' terminates LPFBLD in the EXTRACT mode. 
For example, 

EX A, B,C 
EX D 
/* 

would extract modules A, B, C, and D from LUN 9 and output the 
object to LUN 7. An end of file is written at the end of LUN 7. 

MODE 4: The control record of 'DELtf' implies that the object for the mem- 
bers of the linkable parts file that are named on the control card 
is to be deleted from LUN 9- The syntax of the DELETE (DEL) 
command is the same as for the EXTRACT command in mode 3. 
Multiple DEL commands may be entered if necessary. 



Change 1 



8-78 



Digital Systems Division 




943005-9701 



Table 8-27, LPFBLD Logical Unit Assignments 



LUN 


Description 


Comments 





Control Input 


Control records are read to select the 
LPFBLD mode of execution. 


5 


Object Input 


One or more object modules, input termi- 
nated by an EOF. This LUN is refer- 
enced for the 'CR T and 'MOD' modes. The 
LUN is rewound before any input is read. 


6 


Listing 


Listing of IDT names of all object mod- 
ules entered through LUN 5 and error 
messages. 


7 


Extract Mode Output 


Output LUN for the 'EX' mode. This 
LUN is rewound before any object is 
written and is terminated with an end of 
file. This LUN is processed as a link 
sequential file or a device that supports 
binary output. 


9 


Update File 


Key indexed linkable parts file built 

a logical record length of 80 charac- 
ters. 



13.5 ERROR CODES 

• "INDEX FILE FULL" 

This message indicates that the linkable parts file is full and no 
records can be added. The user must define a new file with a larger 
maximum allocation and then recreate the file or use the DXCOPY 
utility to copy the old file into the new file. 

• "INVALID MODE" 

The control record was invalid. Columns 1 through 4 of the control 
record must be 'CRtftf', 'MODtf', 'EXtftf', or 'DELtf' unless an end 
of file is input. 

"<name> IS NOT IN FILE" 

The number name specified on the DEL or EXT control record does 
not exist on LUN 9. The processing does not terminate but just 
skips over the invalid name. 
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Record 
Key 

PGMOltf 



Data Associated with Key (OBJECT Record) 

1700 PGM01 
1702 



TABLED 



1706 

1700 TABLE 



1706 



Figure 8-23. Format of Linkable Parts File Built by LPFBLD 

8. 14 BUILD EDIT FILE UTILITY (BLDEDT) 

The build edit file utility, BLDEDT, constructs keyed indexed files for edit- 
ing under the Interactive File Editor (IFE) of the Interactive Terminal Sub- 
system. Reference the Interactive File Editor description in Section VII of 
this manual for a discussion of the uses for BLDEDT. 

8. 14. 1 STANDARD JCL PROCEDURE 

The following listing is a standard procedure for BLDEDT: 

,# CREATE BLDEDT.COMMENT, "BUILD EDIT FILE • 

/REPLACE BLDEDT . BUILD EDIT FILE . 

/EXEC 0BJ«Cl, SYSTEM, BLDEDT) MEM»(300, 550, 2000) PRTY«C1,15)| 

/ TIME»»1 HEM|«MEM PRTY|«pRI TlMEl«TIM 

/ASSIGN 10 DISCI DEVICEI«DIN FILEI»FIN 8UFFERSM '. SOURCE INPUT 

/ASSIGN 20 DISCI DEVlCEf»D0UT FlLEi«F0uT REPLACE BUFFERS«2j 

/ BUFFERSl"B0UT INDEXED ACCESs«(ANY, ANY, ANY, ANY) J 

/ ACCESSMCOUT ALLOCATE«(l # 0,256,l00) ALL0CATEl»L0UTl 



/ 

/END 



KEYLEN»2 



. SOURCE OUT FILE 



8. 14. 2 MEMORY PARTITION REQUIREMENTS 

The following are the memory requirements for BLDEDT utility: 

<stksiz> = 300 words 

<jarea> = 550 words 

<jearea> = 2000 words 

8. 14. 3 LUN ASSIGNMENTS 

The LUN assignments for BLDEDT are given in table 8-28. 
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.14.4 OPERATION 



The Build Edit File (BLDEDT) utility is a Z-task program operating under 
DX980. BLDEDT accepts input from a sequential access source (either de- 
vice or file) and builds the key indexed edit file such that the 1-word keys 
are record numbers and the data is the source text. The first record has a 
key of "1", the second "2", etc. 

Table 8-28. BLDEDT Logical Unit Assignments 



LUN 



10 
20 



Description 



Source Input 
Source Output 



Comment 



Sequential device /file 

Key indexed file with key length of 2 charac- 



ters. 



8. 14. 5 ERROPv CODES 

BLDEDT does not have any unique error codes. The system detects any ab- 
normal condition. Refer to Appendix A for the error codes. 

8.15 LIST EDIT FILES UTILITY (LSTEDT) 

The List Edit Files Utility (LSTEDT) lists an entire IFE File on a formatt- 
able device. Although the List Record edit command of the Interactive File 
Editor lists selected records in an edit file, this utility program lists the en- 
tire edit file. This listing can be valuable for subsequent editing sessions 
since the record number for each record is displayed along with the record. 
The format of the listing is a four digit record number followed by a separator 
blank and the data record. 

8.15.1 STANDARD JCL PROCEDURE 

The following listing is a standard procedure for LSTEDT: 

,# CREATE LSTEDT, COMMENT. "LIST EDIT FILE ■ 

/REPLACE LSTEDT • LIST EDIT FILE . 

/EXEC 0BJ«<1, SYSTEM, LSTEDT) MEM«{300, 1700,650) PRTY«C1,15)| 

/ TIME«itl MEM|»MEM PRTY|»pRI TlMEl«TIM 

/ASSIGN 10 SC DEVICEI«0LST '. SOURCE OUTPUT 

/ASSIGN 20 DISCI DEVlCEl»DIN FILEI«FIN BUFFERSM '. SOURCE INPUT FILE 

/END 

8. 15. 2 MEMORY PARTITION REQUIREMENTS 

The following are the memory requirements for the LSTEDT utility: 

<stksiz> ;= 300 words 

<jarea> = 1700 

<jearea> = 650 words 
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8.15.3 LUN ASSIGNMENTS 

The required LUN assignments for the LSTEDT utility are given in table 
8-29. 

Table 8-29. LSTEDT Logical Unit Assignments 



LUN 


Description 


Comment 


10 
20 


Source Output 
Source Input 


Formattable device 

Key indexed file with key length of 2 charac- 
ters. 



8.15.4 OPERATION 

The LSTEDT utility is a single- task program that operates under DX980. 
No command input is required. The key indexed file assigned to LUN 20 is 
listed to the formattable device assigned to LUN 10. 

8. 15. 5 ERROR CODES 

LSTEDT does not have any unique error codes. The system detects abnor- 
mal conditions. Refer to Appendix A for error codes. 

8. 16 CREATE, DELETE, OR REPLACE FILE (FILMGR) ' 

The File Manager Utility (FILMGR) creates, deletes or replaces a file. If 
the user specifies replacement and a file with the same name presently exists, 
FILMGR deletes the old file and creates a new file. 



8. 16. 1 STANDARD JCL PROCEDURE 

The following listing is a standard procedure for FILMGR: 

,* CREATE FILMGR, COMMENT, "FILE CREATE/DELETE CAPABILIT" 

/REPLACE FILMGR . FILE CREATE/OELETE CAPABILITY . 

/EXEC 0BJ«(t f 3Y8TEM,DXC0PY) MEM«(300, 2650. 850) PRTY»(!,!5)> 

/ TIME--1 PRTY|«PRI TIMgiaTlM 

/ASSIGN 1 DISCI 0EVICEI»DISC FlLE|sFlLE NEW|*NEH REPLACE! »REpi 



/ 

/ 

/ 

/ 

/ASSIGN 5 DUMMY 

/ASSIGN DUMMY 

/ASSIGN 7 DUMMY 

/assign s Dummy 

/END 



0ELETEI«DEL BUFFERS-1 LINK8eQ|«LIN RELRECl«RELI . FILE TO BE 
INDEXED|»IND ACCESS«(ANY,ANY#ANY#ANY) ACCESSt«ACCl". CREATED/DELETED 
ALLOCATElMLL KEYLEN»6 KEYLENl»KEY LRECL«64I 
LRECLt'LRE 
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8. 16. 2 MEMORY PARTITION REQUIREMENTS 

The following memory parameters are required for the FILMGR utility: 

< stksiz > = 300 

< jarea > = 2650 

< jearea>= 850 

8 S 16, 3 LUN ASSIGNMENTS 

The required LUN assignments for the FILMGR utility are given in table 
8-30. 

Table 8-30. FILMGR Logical Unit Assignments 



LUN 


Description 


Comment 


1 


File to be 


created, deleted or 


replaced 


Any file type 


5 


Not used 






Assign to DUMMY 


6 


Not used 






Assign to DUMMY 


7 


Not used 






Assign to DUMMY 


Q 








Assign to DUMMY 



Change 1 



8-82A/8-82B 



Digital Systems Division 




943005-9701 



8.16.4 OPERATION 

The FILMGR utility executes the load module, DXCOPY. Assignment of 
LUN 1 to the file being managed accomplishes the action specified in the job 
control when processed by DX980 job management. Parameters in the Run 
command indicate if the file is to be created, deleted or replaced. Deleting 
a file need only specify the file name and password (if the file is password 
protected against deleting). Both the NEW and REPLACE specifications re- 
quire further statements to allocate new disc space, define the access code 
and state the type of file. 

8. 16.4. 1 DELETING FILES. The Run command required to delete a file 
is of the following form: 

//RUN FILMGR DISC=<devnam> FILE=(<fileid>, <filnam>,<pswd>) DEL 

Section II of this manual (Job Control Language) describes the variable 
parameters. The password (<pswd>) may be omitted if the file is not pass- 
word protected against deleting. 

8. 16.4.2 CREATING A LINKED SEQUENTIAL FILE. The Run command 
necessary to create a new linked sequential file is of the form: 

//RUN FILMGR DISC=<devnam> FILE=(<fileid>, <filnam>,<pswd>) NEW LIN; 

ACC=(<integ>,<integ>, <integ>, <integ>) ALL = (<itrks>, <trknum>,<prwrds>,< mtrks>) 

Section II of this manual describes the parameters in this statement. A 
sample Run command to create a 50- track, linked sequential file that anyone 
can access appears as follows: 

//RUN FILMGR DISC=DISC1 FILE=(USER0 1, FILE1) NEW LIN; 
ACC=(ANY, ANY, ANY, ANY) ALL = (50, 0, 256, 60). 

The file is created on DISCI, has no password, has a physical record length 
of 256 words and a maximum allocation of 60 tracks. The search for avail- 
able space starts with track zero. 

8. 16.4. 3 CREATING A RELATIVE RECORD FILE. The RUN command 
used to create a relative record file appears as: 

//RUN FILMGR DISC=<devnam> FILE =(<fileid>, < filnam>, <pswd>) NEW REL; 
ACC=(<integ>, <integ>, <integ>, <integ>); 
ALL = (<itrks >, <trknum>, <prwrds >,< mtrks>) LRECL=<lrchar> 

The allocation of a relative record file is similiar to a link sequential except 
that the logical record length, <lrchar>, must also be specified. A sample 
allocation of a relative record file with a physical record length of 256 words 
and a logical record length of 64 characters appears as follows: 

//RUN FILMGR DISC=DISC1 FILE=(USER0 1, FILE2, ABC); 
NEW REL ACC = (ANY,PSWD, CREAT, CREAT); 
ALL = (50, 0, 256, 50) LRECL = 64 
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This file is created with a password of ABC. Note the initial and maximum 
track allocation must be the same since the relative record file is not ex- 
pandable. 

8. 16.4.4 CREATING A KEY INDEXED FILE. A key indexed file may be 
created with a Run command of the form: 

//RUN FILMGR DISC=<devnam> FILE=(<fileid>,< filnam>, <pswd>) NEW IND; 
ACC = (<integ>, <integ>, <integ>, <integ>); 
ALL = (< intrks>, <trknum>, <prwrds>,< mtrks >) KEYLEN=<klchar> 

The parameter, <klchar> , specifies the key length in characters. The maxi- 
mum key length is 30 characters. To create a key indexed file with a key 
length of 6 characters, the following command may be used: 

//RUN FILMGR DISC=DISC2 FILE=(SYSTEM, FILE3) ; 
NEW IND ACC = (ANY,PSWD, CREAT, NONE); 
ALL = (10, 0, 128, 20) KEYLEN=6 

This file is created on DISC2 and has a physical record length of 128 words. 

8. 16.4. 5 REPLACING FILES. If the replace (REP) parameter is specified 
instead of new (NEW), any file with the specified name is deleted before the 
new file is created. All information in the old file is destroyed. 

8. 16.5 ERROR CODES 

Error messages for FILMGR are the same as those for DXCOPY. 
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APPENDIX A 
ERROR MESSAGES 



Digital Systems Division 




0X960 ERROR CODES 

AS Op 04/09/79 

1 -OUT OF PARTITION REFERENCE IMPLTED BY PARAMETERS OF AN SVC CALL 

2 -JOB EXTENSION AREA TOO 3"ALL 
4 -NO 8PACE IN OSCA 

B -ILLEGAL NUMBER OF PARAMETERS IN SVC LIST 

6 -I/O ATTEMPTED ON N0N.A3STGNED LUNO 

7 -I/O ATTEMPTED WITHOUT OPFN 

8 -DUPLICATE OPEN ON 3AMF L !! NO 

9 -WAIT CONTROL LIST ERROR FOUND OK USER SUSPEND 

10 -PRIORITY ERROR 

11 -CPU TIME EXCEEDED 

12 -ILLEGAL USER POST 

13 -ILLEGAL INSTRUCTION 

14 -A NON-EXISTENT SVC *A8 ISSUED 

IB -USER HAS REQUESTED ACCESS TO A PRIVILEGED SVC 

16 -ILLEGAL SVC ARGUMENT -OUTSIDE USER PARTITION 

17 -PTR TO SVC ARG LIST QtTSTDE USER PARTITION 

18 -INVALID DEVICE I D 

19 -NO SPACE IN PCS 

20 -NO SYSTEM LUNO a 141 

21 -USER FILE DIRECTORY OVERFLOW 

22 -MASTER FILE DIRECTORY OVFRFLOw 

23 -PREVIOUSLY DEFINED USER TD 

24 -ILLEGAL USER ID 

26 -ATTEMPT TO DELETE SYSTEM DISC MFD 

26 -INVALID ABNORMAL JOB TER U INATIQK CODE 

27 -UNDEFINED FILE 

29 -ATTEMPt'tVrEPLACE PREV ASSIGNED FILE 

30 -PREVIOUSLY DEFINED FILE 

31 -INVALID FILE TYPE 

32 -INSUFFICIENT TRK SPACF 0* DEFINE 

33 -IN3UFF. C0NTI6. TRK SPACE ON DEFINE 

34 -EXCEEDED DISC SIZE ON DEFINE 

35 .ZERO KEY LENGTH FOR DEFIME 

36 -READY JSB FILE BAD 

37 -ATTEMPT TO DELETE A SHARED FILE 

38 -INVALID FILE DISPOSITION CODE~ 

39 -DEVICE OFFLINE 

40 -ATTEMPT TO SHARE UNSHARABLE DEVICE 

41 -ATTEMPT TO SHARE BLOCKED DEVICE 

42 -ATTEMPT TO ASSIGN EXCL A SHARED PASSED RESOURCE 

43 -OPERATOR CANCELLATION 

44 -TOO MANY JOB STEPS 
46 -INVALID JCB 

46 -INVALID INPUT LDT 

47 -JOB NO/STEP NO. NOT IN SYSTEM 

48 -JOB NAME NOT IN SYSTEM 

49 -ATTEMPT TO ILLEGALLY ACCESS FILE 

50 -POTENTIAL RESOURCE DEADLOCK DUE TO INCOMPLETE PASSING 

91 -INVALID JCB SIZE SPECIFIED 

92 -ATTEMPT TO DEAtSIGN UKAS3I6NED LUNO 

93 -TOO MANY JOB STEPS (MB) IN ONE JCB STRING 

94 -PARENT JOB ENDED BEFORE TOB STRING STARTED 

55 -LOAD MODULE TOO BIG FOR SPECIFIED USER SPACE, 

96 -NO JOB INITIATION SYSTEM TASK FOR JOB 

97 -LOAD MODULE LOAD NO GOOD 
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98 -ATTEMPT TO ASSIGN TO DISC DIRECTLY 

99 -DEA83IGNMENT OF OPEN DEVICE/FILE 

60 SQQM-SYSTEM OUTPUT QUEUE OVERFLOW 

61 SQOM-TOQ MANY OUTPUT FILES 

62 -MEMORY PARITY ERROR 

63 -MEMORY PROTECT ERROR - ADDRESSING ERROR 

64 -PRIV1LEDGE INSTRUCTION' VIOLATION 

65 -RESOURCE STACK OVERFLOW 

66 -BYTE RELOCATION ADDR DAD IN LD HOD 

67 -MIP NO BAD FOR LOAD OR L^ADR 

69 -LOAD OR LOADR EXTENDS BEVOND USER MEM 

70 9PS-CAN NOT ALLOCATE INPUT DFVICE (REASON-MEMORY OR DEVICE NOT AVAILABLF) 

71 BPS-READ ERROR ON INPUT DEVICE 
72BPS0C-ILLEGAL OR MISSING "JOB" COMMAND 
73BPSOC-XLLEGAL RUN COMMAND 

74 BPS-ILLEGAL DATA COMMAND 

79 BP3.T0Q MANY INPUT DATA FILE 

76 BPS-NO OF INPUT DATA FILES UNMATCHED KITH NO OF ASSIGNED INPUT DATA FILES 

77 BPS-DATA COMMAND UNMATCHED WITH INPUT ASSIGNMENTS 

78 BPS-OUTPUT QUEUE ERROR - REINITIALIZE QUEUE TO USE BOS 

80 -JOB/STEP NUT IN ROLL FILE DIRECTORY 

81 -NO SPACE AVAILABLE IN ROU FILE 

82 -INSUFFICIENT ROLLABLE ME M ORV 

83 -ROLL PERFORMED NORMALLY 

84 -ROLL FILE CLOBBERED 

86 BP3-DATA ERROR ON LINE PRINTER 

86 BPS-END OF FILE ENCOUNTERED WHILE SKIPPING RECORDS 

87 -REQUEST FOR MORE MEMORY THAN IN FREE MEMORY 

88 -DEVICE FILE REQUESTED AT RUNTIME NOT AVAILABLE 

89 -INVALID JOB STEP NUMBER TN JSB 

90 -ILLEGAL NUMBER INPUT 

91 -ILLEGAL COMMAND 

92 -TOO MANY JOBS IN THE SYSTEM 

93 »LUNO LOT NQT FOUND 

94 iNOT A RR FILE 

96 JCL-USER-ID SPECIFIED FOR PRHCEDURE LIBRARY DOES NOT EXIT 

96 JCL-PROCEDURE LIBRARY D0E8 N"T EXIST UNDER SPECIFIED USEP^ID 

97 JCL*U3ER CANtT GAIN ACCESS T* PROCEDURE LIBRARY BECAUSE OF INTEGRITY CODE 

98 JCL-3PEC1FIED PROCEDURE DOES NOT EXIST IN PROCEDURE LIBRARY 

99 JCL-HARDWARE FAILURE WHILE ATTEMPTING READ FROM SPECIFIED PROCEDURE LIB ■ 

100 JM-ATTEMPTED TO USE FILE OF RESTRICTED USER ID 

101 OC*HARONARE I/O ERROR IN Op, COMMUNICATIONS 

102 OC-INVALID MESSAGE ID 

103 OC-INVALID OPERAND IN OP,CO"MUNICATIONS 

104 OC-INVALID ARGUMENT LIST IN OP. COMMUNICATIONS 

106 OC-INVALID JOB NUMBER PASSE* IN OP. COMMUNICATIONS 

106 OC-ATTEMPT TO OFFLINE 8Y8TE" DISC OR SYSTEM CONSOLE 

107 OC-NO SPACE IN DSCA OR JEA 

106 OC-INVALID OP. COMMUNICATIONS COMMAND 

109 OC»JO0 NUMBER NOT FOUND BY ^COMMUNICATIONS 

110 OC-IN OJCBPR, INVALID SIZE REQUIRED FOR '//JOB* JSB 

lit OC-INVALID NUMBER USED FOR SKIP COMMAND TO BATCH OUTPUT SPOOLER 

112 OC-UNDIFINED COMMAND GIVEN TO BATCH OUTPUT SPOOLER 

201 IO-DEVICE NQT READY 

202 IO.CONTROLLER ERROR 

203 IOwDATA ERROR 

204 IO-CONTROLLER BUSY ERROR 
206 IO-WRITE PROTECT ERROR 

206 IO-EOR ERROR 

207 IO-READ«AFTER»WRITE ERROR 

208 IO-DEVICE OFFLINE 

209 IO-ILLEGAL OP«CODE 
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210 IO-DEVICE TIMEOUT (DEVICE DTD NQT RESPOND) 

233 FM-NO SPACE AVAILABLE ON DISC VOLUME 

234 FM-FILE FULL I/O ERROR 

235 FM-ATTEMPTED WRITE, LOGICAL RECORD >• PHYSICAL RECORD ♦ OVERHEAD 

236 FM-HARDWARE FAILURE ON DISC VOLUME 

237 FM-XNDEX, REPLACE ATTEMPTED ON NONfEXlSTING KEY 

238 FM-EXISTING KEY FOUND ON 'WRITE* QP»CODE —OPERATION NOT PERFORMED 

239 FM-INDEX, WRITE/REPLACE ATTEMPTED ON NON«-KEYED RECORD 

240 FM-INDEX, REPLACE ATTEMPTED ON KEYED RECORD 

241 FM»INDEX, REPLACE ATTEMPTED ON NULL DATA (NON-EXISTENT) 
243 FM-INDEX, REL«REC NO KEY A*TER SEARCH 

249 FH-INVALID FILE TYPE (NONEXISTENT) 

250 FM-INSUFFICIENT TRACKS FOR ALLOCATION 

251 FM-INSUFFICIEnT CONTIGUOUS tracks LEFT ON DISC VOLUME 

252 FM«.ALLOCATION EXCEEDS DISC VOLUME CAPACITY 

254 FINABLE TO ALLOCATE BUFFERS BECAUSE OF JOB EXTENSION SIZE 

256 FM-INSUFFICIENT NUMBER OF B"FFER3 FOR ATTEMPTED OPERATION 

257 FM-OPCODE IS EITHER NONEXISTENT OR ILLEGAL 

258 FM.ACCESS VIOLATION, INTFGRTTY ERROR 
401 rSCN-OVERFLOW OF KEYWORD AREA 

482 cSCN-OVERFLOW OF PACKED STRING STORAGE 

403 c3CN»R.H,S, OF EXPRESSION OR TERM MISSING 

404 C3CN.ILLEGAL EXPRESSION SUBSCRIPT 

405 £SCN-MI3SING DELIMETER AFTER COMMAND ID 

406 CSCN.NUMBER IS LARGER THAN 16 BITS 

407 CSCN-QPERAND STARTS WITH ILLEGAL CHARACTER 

408 CSCN.ILLEGAL DIGIT IN DECIMAL NUMBER 

409 CSCN»MI3S1NG DELIMTER UETWEEN OPERANDS 

410 cSCN-MISSING DELIMETER BEUEE*' SUBSCRIPTS 

411 CSCN-ILLEGAL CHARACTER PRECEEns COMMAND 

412 ITS-RUN COMMAND DOES NOT CONTAIN A LABEL OR AN EXPRESSION 

414 pSCN-RIGHT HAND SIDE OF ASSIGNMENT MISSING 

415 C3CN-M0RE THAN ONE • SIGN IN FXPRESSIQK 

416 C3CN-8IZE OF PACKED STRING < fl CHARACTERS 

417 CSCN.UPPER BOUND ON KEYWORD AREA < 1 

418 CSCN-NUMBER OF RESERVED LABELS « 

419 rSCN-STARTING COLUMN FOR SCAN NOT IN RANGE C0I79) 

420 JCL-FOR A NEW FILE, USER DIRECTORY NAME DIFFERS FROM CURRENT USER 

421 JCL-J8B MUST CONTAIN DEVICE INDEX, MOT THE PDT ADDRESS 
AID JfL.nFVYfF TUDEX MUST BE <9 ?55 

423 JCL-PHYSTCAL rIL. < KEY-LENGTH ♦ 14 

424 JCL-FILE HAS BAD ACCESS CODE VALUE 
426 JCL»BOTH 'DELETE' ft 'PA33' SPECIFIED 

426 JCL-LOGICAL R.L. > PHYSICAL R.L. 

427 JCL-LOGICAL R.L. * MULTIPLE *F 32 

428 JCL-DEVICE NOT SPECIFIED OR TNCORRECTLY SPECIFIED 

429 JCL-USER ID NOT SPECIFIED 

430 JCL-FILE NAME NOT SPECIFIED 

433 JCL«# PRIORITY LEVELS > 31 OR < 1 

434 JCL-JOB STEP PRIORITY > 31 OR « 1 
436 JCL-OBJ, VOLUMN ID IS > 20 OR < 1 

436 JCL-TCB STACK SIZE < 1 WORD 

437 JCL-ILLEGAL COMMAND AFTER 'DFLETE' 
439 JCL-TIME LIMIT « 1 SECOND 

443 JCL-# PRIORITY LEVELS ♦ JOB STEP PRIORITY IS > 31 OR « 1 

444 JCL-JOB EXTENSION SIZE «f TCR STACK SIZE ♦ 15 WORDS 

446 JCL-VOL USER ID NOT INITIALISED 

447 JCL-VOLUMN FILE NOT INITIALISED 

448 JCL-VOL USER ID OR FILE NAME > 6 CHARS 

449 JCL-VOL PASSWORD > 4 CHARS 

450 JCL-WRQNG # OF OPERANDS ON TWE RIGHT SIDE OF AN EXPRESSION 
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451 JCL-OPERAND IS NOT A LABEL 0* A SUBSCRIPTED EXPRESSION 

432 JCUQPERAND ON THE RIGHT SlDF IS NOT A LABEL OR A NUMBER 

453 JCL-BAO DEVICE NAME 

454 JCL-BLOCK SIZE < 1 

456 JCL-REDEflNITlQN OF LUNO IN TCBSTEP 

457 JCL-PA3SW0RD > 4 CHARACTERS 

458 JCL-USER ID OR FILE NAME > 6 CHARACTERS 

459 JCL-NUMBER BUFFERS < 1 

46C JCL-RE-INITIALIZATION OF J8B ITEM 

461 JCL-BAD LABEL FOR ACCESS CODF 

462 JCL-INIT1AL TRACKS < 1 

463 JCL-FIRST TRACK ADDRESS < 

464 JCL-PNYS1CAL RECORD LENGTH < 32 

465 JCL-PHYSICAL R.L. NOT MULTIPLE OF 32 

466 JCL-MAX TRACKS « (INITIAL OR 1) 

467 JCL-LOGICAL RECORD LENGTH < 1 

468 JCL*LUNO NUMBER NOT IN RANGE TO 254 

469 JCL-KEY LENGTH NOT IN RANGE t TO 30 

470 JCL-OPERAND DOESN'T START WITH LABEL 

471 JCL-KEYNAME ON THE LEFT SIDE OF AN EXPRESSION IN NOT DEFINED 

475 JCL-»OVERFLOW OF KEY-ENTRY TA"LE 

476 JCL-OVERFLO* OF KEY-REFERENC TABLE 

477 JCL-OVERFLOW OF KEY-CHAPS TAUE 

478 JCL-DI3C ERROR ON LUNO 4 

479 JCL-INDEX KEY NAME FOLLOWING 'CREATE' OR 'REPLACE' > 6 CHARACTERS 

480 JCL.GREATER 31 ASSIGN CARtS TN THIS JOB STEP 

481 JCL-'CREATE' OR 'REPLACE' NOT FOLLOWED BY INDEX KEY NAME 

490 JCL*DEV INDEX « 21 OR FILE V"L > 20 

491 JCL-PHYSICAL R.L. (CHAR) < C«EYLEN ♦ 2 ♦ 14) 

492 JCL-FILE TYPE NOT SPECIFIFD «HEN NEFDED (DEFINE, ETC. 5 
501 JCL»KEYNAME IS NOT IN RESERVED *ORD LIST 

505 JCL-* OF ENTRIES IN TABLE PASSED TO 'CRLOOK' IS NEGATIVE 

510 JCL-SUB3CRIPT8 APPEAR ON I HS OF EQUAL SIGN 

511 JCL-TRIED TO FETCH NQN^EXISTANT RHS SUBSCRIPT 

512 JCL-TRIED TO FETCH NQN-EXISTANT OPERAND 

520 JCL»I/Q ERROR ON LUNO • 2. fECHQ PRINT) 

521 JCL-EOF, EOM, OR I/O ERROR OM LUNO • 1, (JCL IN) 

522 JCL-MIS8TNG SLASH IN FIRST COLUMN OF JCL 

623 JCL-OVERRIDING KEY WORD ON R'lN CARD DOES NOT EXIST FOR THIS PROCEDURE 

526 JCL-Nl'MBER OF KEY-ENTRIES IS NEGATIVE 

527 JCL-NUMBER OF KEY-ENTRIES P »9 

528 JCL-NUMB5R OF KEY-REFERENCES < <3 OR > 19 

529 JCL-NUMBER OF KEY-CHARACTERS NOT IN RANGE TO I2e 

530 JCL-KEY.ENTRY POINTS TO KEY REFERENCE WHICH IS NOT INITIALIZED 

531 JCL.KEY-ENTRY FLAG INDICATES THAT NEITHER JCB NOR LPT IS BEING INITIALIZED 

532 JCL-LDT NUMBER REFERENCE BY KEY-ENTRY IS NOT IN RANGE « TO 30 

533 JCL-PRODUCTION NUMBER NOT IN RANGE 3 TO 31 

534 JCL-JOB STEP NUMBER NOT I* RANGE 1 TO 15 

534 JCL-JOB STEP NUMBER NOT IN RANGE 1 TO IB 

535 JCL-KEY-CHARS HAS LESS THAN « CHARACTERS 

536 JCL-CHARACTER8 OVERFLOW KEY-CHAR STORAGE 
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APPENDIX B 
SAMPLE JCL SEQUENCES 
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APPENDIX B 
SAMPLE JCL SEQUENCES 

Job Control Sequence (JCS) for particular system installations are supplied 
on file JCLSRC contained on the disc image tape. List this file after com- 
pleting installation. 

This appendix contains sample listings of some sequences. These samples 
are not necessarily the exact sequences supplied on the previously mentioned 
tape. 
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*A 



.•UPDATE 

,#TAPE 'DX980 JCL SOURCE FILE',' 

.# CREATE ASMBLR, COMMENT, "ASSEMBLE 

/REPLACE ASMBLR . ASSEMBLE , 

/EXEC 0BJ«(1, SYSTEM, ASMBLR) MEM«(300,5000, 100P) PRTY«fi,l5)| 

/ TIME«-1 MEM|«MEM PRTY|*PRI TIME|«TIM 

/ASSIGN DUMMY DEVICEl«DMSG SHARE 

/ASSIGN 4 DUMMY DEVlCEt«DCON SHaRE»«ScON 

/ASSIGN 5 DISCI DEVICE1»DSRC FIlE|«FSrC BUFFERS*! 

/ASSIGN 6 SC DEVlCEl«DLST FlLE:*FLST SHAREJ»SLST RUFFERS«i. 

/ASSIGN 7 DISCI DEVlCEl«DOBJ FILEjsFObJ NEW|«NOBJ* 

/ REPLACEfROBJ BUFFERS.! LlNKSEQf 

/ ACCESSMANY,ANY/ANY»ANY) ACCESS|«COBj; 

/ ALLOCATE«(1,0,64,10) ALLOCAtE|«LOBJ 

/ASSIGN 16 DISCI FILE* (TEMP, SCRL) NEW BUFFERS«1 LINKSEQI 

/ ACCESS«(ANY,ANY,ANY#ANY) ALLOCATE«(10,300,256,30) . 

/END 

.# CREATE ASMGO .COMMENT, "EXECUTE ASM LANG GENED L M « 

/REPLACE ASMGO . EXECUTE ASSEMBLY LANGUAGE GENERATED LOAD MODULE . 

/EXEC 0BJ«(1 ,USER01 ,G0) MEM»(300, 4000* 1000} PRTY»(1#15)? 



SYSTEM MESSAGE 
CONTROL/MESSAGE 
SOURCE INPUT 
SOURCE I.IST/ERROR 



OBJECT OUTPUT 
SOURCE SCRATCH 



TIME«100 OBJ»«OBJ MEm:«MEM PRTY»«PRI TIME|«TIM 

4 DUMMY LUNQ*«LUN4 DEVIcEj«DEv'4 FILEi«FlL4 BUFFERS*2, 

5 SC LUN0l«LUN5 DEVlCE|«DEv5 FlLEl«FlL5 BUFFERS-2, 

6 SC LUN0HLUN6 DEVlcE|«DEv6 FILEl«FIL6 BUFFERS«2j 

7 DUMMY LUN0i»LUN7 DEVlCEi«DEv7 FILES«FIL7 BUFFER3«2, 

8 DUMMY LUN0t«LUN8 DEVlcE|«DEv8 FILEl«FIL8 BUFFERS«2, 



/ASSIGN 

/ASSIGN 

/ASSIGN 

/ASSIGN 

/ASSIGN 

/END 

,# CREATE ASMLGO, COMMENT, "ASSEMBLE, LINK, AND GO • 

/REPLACE ASMLGO . ASSEMBLE, LINK, AND GO . 

.ever- HDi./l oubtCTU A«UQl 0\ MPMl / Idfl . ^ClCTfl . f ddfl 1 PRTY« f I . 1 5 1 I 

f t*Ck UDt) • V » , & I a I W-i I n vi '"kn # • . t~ . > ». «• k »» m - v - - r • » v — * , ... . ._, ,. 



/ASSIGN 

/ASSIGN 

/ASSIGN 

/ASSIGN 

/ASSIGN 

/ 

/ASSIGN 16 

/ 

/EXEC 0BJ« 

/ 

/ASSIGN 5 

/ASSIGN 6 

/ASSIGN 8 

/ 

/ASSIGN 9 

/ASSIGN 10 

/ASSIGN 13 

/ 

/ 

/EXEC 0BJ» 

/ 

/ASSIGN 

/ASSIGN 

/ASSIGN 

/ASSIGN 

/END 



TIME«-1 MEMi«MEMA 
DUMMY DEVICEt«DMSG SHARE 
DUMMY DEVICEl«DCON SHaREmScON 

DISCI DEVICEI»DSRC FIlEj«FSrC BUFFERSM r 

SC DEVlCEt»DLSTA FlLEt»FLSTA BUFFERS»1 
DISCI FILE«(TEMP, OBJECT) NEw BUFFERS-1 LINKSEQI 
ACCESS»(ANY,ANY#ANY,AnY) ALLOCATE«(10,300,64,10) . 
DISCI FILE«(TEMP,SCRL) NEW BUFFERS«1 LINKSEQI 
ACCESS«(ANY,ANY,ANY#ANY) ALLOCATE«(t0,300,256,30) . 
(1, SYSTEM, DXOLE) MEM«(300, 12000,3000) PRTY»(1,15)> 
TIME«-1 MEM|«MEML 

DISCI FILE«(TEMP, OBJECT) DELETE BUFFERS»1 
SC DEVICEI«DLSTL FiLEt»FL3TL BUFFERS-1 
DISCI FILE«(TEMP,LM) NEW BUFFERSM RELREC LRECL-64; 
ACCES3«(ANY,ANY#ANY,AnY) ALLOCATE«(10,300,32.10) . 
DUMMY 

DISCI FILE»(TEMP,SCRL) DELETE BUFFERS»1 
DISCI FILE«(TEMP,SCRR) NEW DELETE BUFFERS-1 RELRECl 
ACCESS* (ANY, ANY# ANY, ANY) ALLOCATE«(10,300, 128, 10) } 

LRECLP100 
(1,TEMP,LM) MEM«(300, 4000, J000) PRTY«(1,15)| 

TIME-100 MEMI«MEMG TlME|»TlMG 

DUMMY DEVICEt«DEV4 FlLE|«FlL4 BUFFERS-2 

SC DEVICEI«DEV5 FlLEj«FlL5 BUFFERS«2 f 

SC DEVICEI-DEV6 FlLEt«FlL6 BUFFERS»2 

DUMMY DEVICEl»DEV7 



USER PROG LUN 4 

USER PROG LUN 5 

USER PROG LUN 6 

USER PROG LUN 7 

USER PROG LUN 8 



SYSTEM MESSAGE 
CONTROL/MESSAGE 
SOURCE INPUT 
SOURCE LIST/ERROR 

OBJECT OUTPUT 

SOURCE SCRATCH 



PRIMARY INPUT/CON 
LOADMAP LIST/ERR 

LOAD MOD OUTPUT 
LIBRARY FILE 
LINKSEQ SCRATCH 



RELREC SCRATCH 



USER PROG LUN 4 

USER PROG LUN 5 

USER PROG LUN 6 

USER PROG LUN 7 
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,# CREATE ASMLNK, COMMENT, "ASSEMBLE AND LINK " 

/REPLACE ASMLNK . ASSEMBLE AND LINK . 

/EXEC OBJ»U, SYSTEM, ASMBLR) MEM»(300, 5000, 1000) PRTY«iri, 15) > 
/ TIME«*1 MEM|«MEMA 

/ASSIGN DUMMY DEVICEt'DMSG SHARE , 

/ASSIGN 4 DUMMY DEVICE»»DC0N SHaREI«ScON r 

/ASSIGN 5 DISCI DEVICEt«DSRC FIlEi«FSrC BUFFERS-1 

/ASSIGN 6 3C DEVlCEl»DLSTA FlLEl«FLSTA BUFFERS«i 

/ASSIGN 7 DISCI FILE«(TEMP, OBJECT) NEw BUFFERS«i LINKSEQ! 

/ ACCESS«(ANY,ANY,ANY,ANY) ALLOCATE«d0,300,64,i0) . 

/ASSIGN 16 DISCI FILE* (TEMP, SCRL) NEW BUFFERS«1 LINKSEOI 

/ ACCESS«(ANY,ANY,ANY,ANY) ALLOCATE«(10,300,256,30) . 

/EXEC 0BJ«<1, SYSTEM, DXOLE) M£M«(300, 12000,3000) PRTY«fl,l5)> 

/ TIME«*1 MEM|»MEML 

/ASSIGN 5 DISCI FILE«(TEMP, OBJECT) DELETE BUFFERS»1 

/ASSIGN 6 SC DEVlCEt«DLSTL FREl'FLSTL BUFFERS»1 

/ASSIGN 8 DISCI DEVICE!«DLM FILE«(USER01 ,G0) FILE»«FLM» 

/ REPLACEt«RLM BUFFERS*! RELREC; 

/ ACCESS«CANY,ANY,ANY,ANY) ACCESS|»CLM| 

/ ALLOCATE«(10,0,32,10) ALLOCATE|«LLM LRECL«64 , 

/ASSIGN 9 DUMMY DEVICEt«DLIB FlLEi«FLlB BUFFERS*1 r 

/ASSIGN 10 DISCI FILE»(TEMP,SCRL) DELETE BUFFERS«1 

/ASSIGN 13 DISCI FILE«(TEMP.SCRR) NEW DELETE BUFFERS*! RELRECl 

/ ACCESS«(ANY,ANY,ANY,ANY) ALLOCATE«(10,300, 128, 10) t 

/ LRECL«100 

/END 

,# CREATE ASMUP , COMMENT, "ASSEMBLE MOD AND UPDATE LPF • 

/REPLACE ASMUP , ASSEMBLE MODULE AND UPDATE LPF . 

/EXEC OBJ«(t, SYSTEM, ASMBLR) MEM*(300, 6000, 2000) PRTY«M,2)J 

/ TIME«»1 MEM!»MEMA 

/ASSIGN DUMMY DEVICEI«DMSG r 

/ASSIGN 4 DUMMY DEVICEl»DCON 

/ASSIGN 5 DISCI DEVICEI«DSRC FIlE|«FSrC BUFFER3M 

/ASSIGN 6 SC DEVICEI«DLSTA FlLEl»FLST BUFFERSM 

/ASSIGN 7 DISCI FILE«(TEMP, OBJECT) NEw BUFFERS-1 LINKSEQI 

/ ACCESS»(ANY,ANY,ANY,ANY) ALLOCATE«(10,300,64,20) . 

/ASSIGN 16 DISCI FILE«(TEMP.SCRL) NEW DELETE BUFFERS*1| 

/ LINKSEQ ACCESSa<ANY,ANY.ANY,ANY)I 

/ ALLOCATE«(10»300. 256,30) 

/EXEC OBJ«(l, SYSTEM, LPFBLD) MEM«(300. 600, 1000) PRTY«(1,2)> 

/ TIME»-1 MEMi«MEMU 

DUMMY DEVlCEt*DCON f 

5 DISCI FILE-CTEMP. OBJECT) BUFFERS»1 

6 SC DEVICEt»DLSTU FlLEf'FLST BUFFERSM , 
9 DISCI DEVlCEt«DUPD FXi.E|*FUPD REPLACEt"RUPD| 

BUFFERS-2 INDEXED ACCESS»(CrEAT,CREAT,CREAT ,CREAT)/ 
ACCESSI'CUPD ALLOCATEt«LUpD KEYLEN«6 



SYSTEM MESSAGE 
CONTROL/MESSAGE 
SOURCE INPUT 
SOURCE I.IST/ERROR 

OBJECT OUTPUT 

SOURCE SCRATCH 



PRIMARY INPUT/CON 
LOADMAP LIST/ERR 



LOAD MOD OUTPUT 
LIBRARY FILE 
LINKSEQ SCRATCH 



RELREC SCRATCH 



SYSTEM MESSAGE 
CONTROL/MESSAGE 
SOURCE INPUT 
SOURCE LIST/ERROR 

OBJECT OUTPUT 



SOURCE SCRATCH 



/ASSIGN 

/ASSIGN 

/ASSIGN 

/ASSIGN 

/ 

/ 

/END 

,# CREATE BIR , COMMENT, "BATCH INPUT READER ■ 

/REPLACE BIR . BATCH INPUT READER . 

/EXEC OBJ«(l, SYSTEM, BIR) MEM«(300,900#600) PRTV«(i#5)| 

/ PRIV TIME--1 PRTYt»PRl TIME|«TIM 

/ASSIGN 10 CR1 DEVICEt'DIN 

/END 

,# CREATE BIS .COMMENT, "BATCH INPUT SPOOLER ■ 

/REPLACE BIS . BATCH INPUT SPOOLER ■ • 

/EXEC 0BJ«(I,SYSTEM#BIS) MEM«(300, 1200,800) PRTY"(1#5)| 

/ PRIV TIME»-1 PRTYl«PRi TIME|»TIM MEM|*MEM 

/ASSIGN 5 CR1 DEVlCEl«DIN 

/END 



CONTROL 
OBJECT INPUT 
LISTING 



UPDATE FILE 



INPUT STREAM 



INPUT STREAM 
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,* CREATE BLDEDT, COMMENT. "BUILD EDIT FILE " 

/REPLACE BLDEOT • BUILD EDIT FILE . 

/EXEC 0BJ«<1,SYSTEM,BLDEDT) MEM«{300, 550, 2000) PRTY«(1,15)| 

/ TIME»»1 MEHl«MEM PRTYi«pRI TlMEf«TIM 

/ASSIGN 10 DISCI DEVICEI»DIN FILEI«FIN BUFFERS»i 

/ASSIGN 20 DISCI DEVlCEl»OOUT FlLEi«FOuT REPLACE BUFFER8»2| 

/ BUFFERSl«BOUT INDEXED ACCESs«(ANV,ANY,ANY,ANV) J 

/ ACCESSI-COUT ALLOCATE«(l, 0,256, 100) ALLOCATEl«LOU 

/ KEYLEN«2 

/END 

,# CREATE BOS , COMMENT, "BATCH OUTPUT SPOOLER " 

/REPLACE BOS . BATCH OUTPUT SPOOLER . 

/EXEC OBj«(i, SYSTEM, BOS) MEM«(300, 1100, 800) PRTY»(l,5)f 

/ PRIV TIME*-! PRTYl»PRl TIME|»TIM 

/ASSIGN 5 SC DEVICEl»DOUT 

/ASSIGN 6 DUMMY DEVlCEt»DNEW FlLE«(3YSTEM, NEWS) FILEl-FNEWJ 

/ BUFFERS*! 

/END 

.* CREATE CATFIL, COMMENT, "LIST FILES UNDER A USER " 

/REPLACE CATFIL . LIST FILES UNDER A USER • 

/EXEC OBJMl, SYSTEM, CATFIL) MEM«(300, 1850,670) PRTY»(1,5)> 

/ PRIV TIME««1 PRTYl«PRl 

/ASSIGN SC DEVlCElsDCON 8HaRES»BC0N 

/ASSIGN 6 SC DEVICEMDLST FlLEi'PLST 8HAREt»3L3T BUFFERS 

/END 

,# CREATE CATL0G,C0MMENT»"LI3T. CREATE, OR DELETE USERS" 

/REPLACE CATLOG . LIST* CREATE, OR DELETE USERS , 

/EXEC OBJ«(i, SYSTEM, CATLOG) MEM»(300, 4000, 670) PRTY«(i,5)l 

/ PRIV TIME--1 PRTYI«PRI 

/ASSIGN SC OEVICEiaDCON SHAREt»8cON 

/ASSIGN 6 SC DEVICEt»DLST PlLE|«FLST 3HAREt»8LST BUFFERS 

/END 

e « rf»£4TP pFnogg. CQHMENT, "PROGRAM nrnUc AID " 

/REPLACE"DEB580 ' ' . PROGRAM DEBUGAlD . 

/EXEC 0BJ«(1, SYSTEM, DEB900) MEM«(300, 6000, 600) PRTY«(1,15)> 

/ TIME»»1 MEM|«MEM PRTYf-pRl TlMEi«TIM 

/ASSIGN *F0 SC DEVICEl«DCIN 

/ASSIGN #fl SC DEVICEt«DMSG 

/ASSIGN *F2 DUMMY DEVICEt»DCL3T 

/ASSIGN >F3 SC DEVICEt«DUMP FlLEI«PUMP BUFFERS»l 

/ASSIGN *F4 DISCI DEVICEl»DOBJ FiLEt«FOBJ BUFFERS«1 

/ASSIGN DUMMY DEVICE|»DEV0 

/ASSIGN 4 DUMMY DEVICEl»DEV4 FlLEf«FlL4 BUFFER8M 

/ASSIGN 5 DUMMY DEVlCEl«DEV5 FlLEl*FlL5 BUFFER3M 

/ASSIGN 6 DUMMY DEVICEl«DEV6 FiL£l«PlL6 BUFFERS*! 

/ASSIGN 7 DUMMY DEVICEt«DEV7 

/ASSIGN 8 DUMMY LUNOt'LUNS DEVlCEt«DEV8 

/END 

,# CREATE DUMPLP, COMMENT, "DUMP LpF FROM DISC TO MT ■ 

/REPLACE DUMPLP . DUMP LPF FROM DISC TO MAG TAPE ', 

/EXEC OBJsCl, SYSTEM, DXCOPY)MEM«(300, 4000, 3000) PRTY«(1,2), 



Tl 



SOURCE INPUT 



SOURCE OUT FILE 



OUTPUT LISTING 



■ 1 



CONTROL 
.FILE LISTING 



/ASSIGN 

/ASSIGN 

/ASSIGN 

/ASSIGN 

/ 

/END 



TIME"*! MEMtvMEM 

5 DUMMY DEVICEIPDCON 

6 3C DEVICElfDLST PlLE|«FLsT BUFFERS-1 

7 MT1 DEVICEl»DOUT FlLEi«FOuT BUFFERS«2 

8 DI8C1 DEVICEl«DlN FlLE»(SYSTEM,LPF) FlLEl«FINI 

BUFFER8-2 



CONTROL 
.USER LISTING 



CONTROL INPUT 
SYSTEM MESSAGE 
CONTROL LISTING 
MEMORY DUMP 
RELOC OBJECT IN 
USER PROG LUN B 
USER PROG LUN 
USER PROG LUN 
USER PROG LUN 
USER PROG LUN 



USER PROG LUN 8 



CONTROL/MESSAGE 

LISTING 

OUTPUT 

INPUT 
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•# CREATE DXCOPY, COMMENT, "GENERAL PURPOSE COPY ■ 

/REPLACE OXCOPV , GENERAL PURPOSE COPY . 

/EXEC 0BJ»(1,3Y3TEM#DXC0PY) MEM*(300, 3700.2000) PRTY«n,l5)J 

/ TIME*-! MEN|*MEM PRTY|»PRI TlME|*TIM 

/ASSIGN 5 DUMMY DEVlCEt*DCON 

/assign s dummy devicei*dlst filei*flst buffers*i r 

/ASSIGN 7 DISCI DEVICEl*DOUT FlLEt«FOuT REPLACEi*ROUT* 

/ BUFFER3*2 BUPFERSI*BOuT LINkSEOi-LIN RELRECt*RELI 

/ lNDEXEDl*lND ACCES3*(ANy,ANY,ANY,ANY) ACCESSt»COUTl 

/ ALLOCATE**!, 0,128,10) ALLOCATEt«LOUT KEYLEN«6| 

/ KEYLEN«»KOUT LRECL»64 LRECLt*GOUT 

/ASSIGN 8 DISCI DEVICEI*DIN FILEl*FlN DELETEt*TIN BUFFERS-! . 

/END 

,# CREATE DXLINK, COMMENT, "LINK D*980 OPERATING SYSTEM * 

/REPLACE DXLINK . LINK 0X980 OPERATING SYSTEM . 

/EXEC OBJ«(l, SYSTEM, DXOLE) MEM*(300, 31500, 8000) PRTY«fl,2)| 

/ TIME--1 

/ASSIGN i DUMMY DEVICEl*DLPl FlLEi*FLpl BUFFER3*2 

/ASSIGN 2 DISCI DEVICEt*DLP2 FlLE«(SYSTEM,DXLPF) FILEt*FLP2l 

/ BUFFERS«2 

/ASSIGN 3 DUMMY DEVICEI*DLP3 FlLEl*FLp3 BUFFERS»2 

/ASSIGN 5 DISCI DEVICE|*DIN FlLE«(USER01,LINKDX) FILE»*FIN| 

/ buffers* i 

/ASSIGN 6 SC DEVICEl*DLST FlLEf«FLsT BUFFERS-1 . 

/ASSIGN 8 DISCI DEVlCEt*DLM FlLE«(USER01,DXMIP) FlLEl«FLM| 

/ REPLACEl-RLM BUFFERS*! RELRECI 

/ ACCESS*(ANY,ANY,ANY,AnY)| 

/ ALL0CATE«(32,247,32,32) ALLoCATEl*LLM LRECL*64 

/ASSIGN 9 DISCI DEVICEf*DLIB FlLE«(SYsTEM,U3RPLX) FlLEl*FLlBf 

/ BUFFERS«2 . 



/ASSIGN 10 DISCI FILE*(TEMP,3CRL) NEW BUFFERS«1 LINKSEQI 

/ ACCESS«(ANY,ANY#ANY,ANY) ALlOCATE«(10, 300,256,80) '. 

/ASSIGN 12 DISCI DEVICEI»DEXT FIlE«(USeR01,DXEXTD) FlLEt«FEXT» 



REPLACEl«REXT BUFFERS.l LINk3EQ| 
ACCESS«(ANY,ANY,ANY,ANY) ACcESSt«CEXT| 
ALLOCATE**!, 0,128,1) 



/ASSIGN 13 DISCI FILE»(TEMP,SCRR) NEW BUFFERS*! RELRECI 



/ 
/ 

/END 



ACCESS* (ANY, ANY, ANY, ANY) ALLOCATE* (2, 300, 128,2) } 
LRECL*100 



CONTROL/MESSAGE 
LISTING 



OUTPUT 
INPUT 



ALT 1 OBJECT IN 

ALT 2 OBJECT IN 
ALT 3 OBJECT IN 

PRIMARY INPUT/CON 
LOADMAP l.IST/ERR 



LOAD MOD OUTPUT 
LIBRARY FILE 
LINKSEQ SCRATCH 

SYS EXT DEFS FILE 
RELREC SCRATCH 



/REPLACE DXOLE . LINK EDITOR '. 

/CXEC 06Ja(!,SY8TEM, DXOLE) MEM* (300, 12f 00. 2000) PRTY*'f 1.15)1 

/ . TIME**1 MEM|*MEM PRTY|*pRl TlMEl*TIM 

/ASSIGN t DUMMY DEVICEllDOBl FILE|*F0B1 BUFFER8*2 

/ASSIGN 2 DUMMY DEVICEi»D0B2 FILE|»F0B2 BUFFERS-2 

/ASSIGN 5 DISCI DEVICEl*DIN FILE|*FIN BUFFERS*1 , 

/ASSIGN 6 SC DEVICEI-DLST ' 

/ASSIGN 7 DUMMY DEVICEl*DOBJ FlLEf*FOBJ BUFFERS*1 . 

/ASSJGN 8 DISCI DEVICEl*DLM FILE|«FLM REPLACEt*RLMf 

/ BUFFERS*! RELREC 8CCESS*(ANY.CREAT.CPEAT,ANY) J 

/ ACCESSt*CLM ALLOC ATE*(1. 0.32.!) ALLOCATEl*LLM| 

/ LRECL-64 

/ASSIGN 9 DISCI FILE»(3Y3TEM,U3RrTN) DEVICEt*DLIBl 

/ FILEtvPLIB BUFFERtaa 

/ASSIGN |0 DISCI FILE»(TEMP.SCRL) NEW BUFFERS*! LlNKSfQI 

/ . ACCE33*(ANY,ANY,ANY,ANY) ALLOCATE«d0,300,296,30) ' 

/ASSIGN |i DISC! FILE*(SYSTEM,DXEXTD) FILEt*FEXT BUFFER3*1 . 

/ASSIGN 13 DISC! PILIn(TEMP.SCRR) NEW BUFFERS*! RELRECI 

/ ACCESSf(ANY,ANY,ANY.ANY) ALLOCATE*(10,300, 126, 10)1 

/ LRECL*I00 

/END 



ALT 1 OBJECT IN 
ALT 2 OBJECT IN 
PRIMARY INPUT/CON 
LOADMAp LIST/ERR 
COMPACT OBJ OUT 



LOAD MOD OUTPUT 

LIBRARY FILE 

LINKSEQ SCRATCH 
SYS EXT DEFS OPT 

RELREC SCRATCH 



Change 1 
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,# CREATE DXOLEP, COMMENT, "LINK PLEXUS PROGRAMS " 

/REPLACE DXOLEP « LINK PLEXUs PROGRAMS , 

/EXEC 0BJ»(1, SYSTEM, DXOLE) MEM«(300, 32000, 3000) PRTY«fl,2)J 



/ASSIGN 

/ 

/ASSIGN 

/ASSIGN 

/ASSIGN 

/ASSIGN 

/ASSIGN 

/ 
/ 
/ 
/ASSIGN 9 



TIME«-1 MEM|«MEM PRTYi«pRI TlMEl«TTM 
DUMMY DEVlCEl«DOBl FlLE«(USER01 ,ASMOUT) FlLEl«FOBl; 
BUFFERS«2 

DUMMY DEVICEI»D082 FlLEi«F0B2 BUFFERS«2 
DISCI DEVICEI«DIN FILEI»FIN BUFFER8«1 
SC DEVlCEt«DLST FlLEi»FLST BLIFFERS«1 
DUMMY DEVlCEl»DOBJ FIlE»«FObJ BUFFERS*! 
8 DISCI DEVICEI«DLM FlLEi«FLM REPLACE»«RLM| 
gijppgpssi RELREC ACCEsS»(* N Yr CREAT-CREAT.AMY) I 
ACCESSI«CLm"alLOCATE« (1.0, 32*1) ALLOCATE! «LLM| 
LRECL-64 
DISCI FILE«(SYSTEM,USRPLX) FILE»«FLIB BUFFERS«2 



/ASSIGN 10 DISCI FILE»(TEMP,SCRL) NEW BUFFERS-l LINKSEQJ 

/ ACCESS»(ANY,ANY,ANY,ANY) ALLOCATE«(10,300,256,30) 

/ASSIGN H DISCI FILE»(SYSTEM»DXEXTD) FILE!«FEXT BUFFERS«1 

/ASSIGN 13 DISCI FILE«(TEMP,SCRR) NEW BUFFERS*! RELRECI 

/ ACCESS»(ANY,ANY,ANY,ANY) ALlOCATE«(10, 300, 128, 10)1 

/ LRECL»!00 

/END 

,# CREATE FILMGR, COMMENT, "FILE CREATE/DELETE CAPABILIT" 

/REPLACE FILMGR . FILE CREATE/DELETE CAPABILITY . 

/EXEC 0BJ»(1, SYSTEM, DXCOPY) MEM»(300, 2650, 850) PRTY»(1,15)> 

/ TIME«-1 PRTYf»PRI TI M EI«TIM 

/ASSIGN 1 DISCI DEVICEI«DISC FlLEi«FlLE NEW|«NEW REPLACEl«REPl 

/ DELETEI'DEL BUFFERS«1 UNKSeQI'LIN RELRECl«RELI 

/ INDEXED|«IND ACCESS«(ANY,ANY,ANY,ANY) ACCESS»«ACC» . 

/ ALLOCATEl'ALL KEYLEN«6 KEYLeN|»KEY LRECL»64> 

/ LRECLl'LRE 

/ASSIGN 5 DUMMY 

/ASSIGN 6 DUMMY 

/ASSIGN 7 DUMMY 

/ASSIGN 8 DUMMY 

/END 

.# CREATE FTNGO .COMMENT, "EXECUTE FORTRAN GENERATED LM" 

/REPLACE FTNGO . EXECUTE FORTRAN GENERATED LOAD MODULE . 

/EXEC OBJ«(1,USER01,GO) MEM«(300» 12000.1000) PRTY«<1,15)> 

/ TIME»100 OBJl»OBJ MEMI»MEM PRTYl«PRI TIMEmTIM 

/ASSIGN SC DEVICEl»DMSG , 

/ASSIGN >B0 SC LUNOfaLUNfl DEVTCEl*OEV0 

/ASSIGN >B1 DUMMY LUN0|»LUN1 DEVlCEl'DEVl 

/ASSIGN .»B4 DUMMY LUN0|»LUN4 DEVlCEl«DEV4 FILEl«FlL4 BUFFERS-2, 

/ASSIGN >B5 SC LUN0|«LUN5 DEVlCEl»DEV5 FILEI»FIL5 BUFFERS«2» 

/ASSIGN *B6 SC LUN0i«LUN6 DEVlCEt«DEV6 FILEl«FlL6 BUFFERS-2. 

/ASSIGN *B8 DISCI LUN0|»LUN8 FILE»(TEMp,8CRL) NEW BUFFER8-1I 

/ LINK3E0 ACCESS«(ANY,ANY,ANY,ANY)> 

/ ALLOCATE>(1,300,32,10) 

/END 



ALT 1 OBJECT IN 
ALT 2 OBJECT IN 
PRIMARY INPUT/CON 
LOADMAP LIST/ERR 
COMPACT OBJ OUT 



LOAD MOD OUTPUT 
LIBRARY FILE 

LINKSEO SCRATCH 
SYS EXT DEFS OPT 



RELREC SCRATCH 



tV? 



FILE TO BE 
CREATED/DELETED 



SYSTEM MESSAGE 
USER PROG LUN 
USER PROG LUN 1 
USER PROG LUN 4 
USER PROG LUN S 
USER PROG LUN 6 



USER SCRATCH FILE 
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,# CREATE FTNLGO, COMMENT, "FORTRAN COMPILE, LINK, AND GO" 

/REPLACE FTNLGO . FORTRAN COMPILE* LINK, AND GO . 

/EXEC OBj«(l. SYSTEM, FTN) MEM«(300, 10000, 1000) PPTY«(1,15)I 

/ TIME"«1, MEMI«MEMC 

/ASSIGN DUMMY DEVICEI«DMSG SHaRE 

/ASSIGN 5 DISCI DEVICEl«D8RC FIlEi»FSrC BUFFERS«1 ', 

/ASSIGN 6 SC DEVICEl«DLSTl FlLEt»FLST BUFFERS«1 

/ASSIGN 7 DISCI FILE«(TEMP, PHASED NEW BUFFERS«1 LINKSEQI 

/ ACCESS»(ANY,ANY,ANY,ANY) ALLOCATE«(10,300,64, 30) '. 

/EXEC 0RJ«(1, SYSTEM, FTNPS2) MEM* (300,8000, 1000) PRTY* f 1 , 15) I 

/ TIME»-1 MEM|«MEMC 

/ASSIGN DUMMY \ 

/ASSIGN 6 SC DEVICEI»DLST2 

/ASSIGN 7 DISCI FILE* (TEMP, OB JECT) NEw BUFFERS«1 LINKSEQ* 

/ ACCESS«(ANY,ANY,ANY,ANY) ALLOCATE«(10,300,64,10) '. 

/ASSIGN 8 DISCI FILE«(TEMP, PHASED BUFFERSM 

/EXEC OBJ«(l, SYSTEM, DXOLE) MEM*(300, 12000,3000) PRTY«(1,15)» 

/ TIME«-1 MEM|«MEML 

/ASSIGN 5 DISCI FILE* (TEMP, OB JEcT) DELETE BUFFERS*1 

/ASSIGN 6 SC DEVlCEl«DLSTL FilE!»FlST BUFFERS«1 

/ASSIGN 8 DISCI FILE*(TEMP,LM) NEW BUFFERS*1 RELREC* 

/ ACCESS»(ANY,ANY,ANY,ANY) ALLOCATE"(10, 300,32,10)1 '. 

/ LRECL*64 

/ASSIGN 9 DISCI FILE«(SYSTEM,USRFTN) BUFFER3«2 

/ASSIGN 10 DISCI FILE«(TEMP, PHASED DELETE BUFFERS*1 

/ASSIGN 13 DISCI FILE«(TEMP,SCRR) NEW DELETE BUFFERS*1 RELRECl 

/ ACCESS»(ANY,ANY,ANY,ANY) ALLOCATE»(10,300,128,10))'. RELREC SCRATCH 

/ LRECL«100 

/EXEC OBJ»(i,TEMP,LM) MEM«(300, 8000, 1000) PRTY«(1,15)| 

/ TIME«100 MEMI«M£MG TlME|«TlMG 



SYSTEM MESSAGE 

SOURCE INPUT 
SOURCE I.IST/FRROR 
INTERMED OBJECT 
SOURCE SCRATCH 



SYSTEM MESSAGE 
ERWOR MESSAGE 

OBJECT OUTPUT 
INTERMED OBJECT 



PRIMARY INPUT/CON 
LOADMAP I.IST/EPR 

LOAD MOD OUTPUT 

LIBRARY 
LINKSEQ SCRATCH 



/ASSIGN SC 
/ASSIGN >B0 SC 



DEVICEl»DMSG 
DEVICEi»DEV0 



/ASSIGN >B1 DUMMY DEVICE|*DEV1 



/ASSIGN >B5 SC 
/ASSIGN *B6 SC 



DEVICEl*DEV5 FiLEl*FlL5 BUFFERS*2 
DEVICE|*DEV6 FiLEX*FlL6 BUFFERS*2 
/ASSIGN >B8 DISCI FILE* (TEMP, SCRL) NEW BUFFERS*1 LINKSEQJ 
/ ACCESS«(ANY,ANY.ANY,ANY) AlLOCATE*(10,300.32, 10) 

/END 

.# CREATE FTNLNK, COMMENT, "FORTRAN COMPILE AND LINK « 
/REPLACE FTNLNK , FORTRAN COMPILE AND LINK . 
/EXEC 0BJ*(1, SYSTEM, FTN) MEM* (300, 10000, 1000) PRTY*(1.15)I 
/ TIME"^1, MEMI«MEMC 

/ASSIGN DUMMY DEVICEl*DMSG SHaRE 
/ASSIGN 5 DISCI DEVlCEt*DSRC FIlE|*FSrC BUFFER3*1 
/ASSIGN 6 SC DEVICEI*DLST1 FlLEl»FLST BUFFERSM 
/ASSIGN 7 DISCI FILE*(TEMP, PHASED NEw BUFFERS-1 LINKSEQ! 
/ ACCESS"(ANY,ANY,ANY,ANY) ALLOCATE*(10,300,64,30) 

/EXEC OBJ*(l, SYSTEM, FTNPS2) MEM*(300, 8000, 1000) PRTY*U,15)| 
/ TIME«-1 MEM|«MEMC 

/ASSIGN DUMMY 
/ASSIGN 6 SC DEVICEI«DLST2 

/ASSIGN 7 DISCI PILE«(TEMP, OBJECT) NEW BUFFERS*1 LINKSEQI 
/ ACCESS*(ANY,ANY,ANY»ANY) ALlOCATE«(10,300,64,10) 

/ASSIGN 8 DISCI FILE»(TEMP, PHASED BUFFERS*! 



SYSTEM MESSAGE 

USER LUN 

USER LUN 1 

USER LUN 5«INPUT 

USER LUN 6»0UTPUT 

USER SCRATCH FILE 



SYSTEM MESSAGE 
SOURCE INPUT 
SOURCE LIST/ERROR 
INTERMED OBJECT 
SOURCE SCRATCH 



SYSTEM MESSAGE 
ERROR MESSAGE 

OBJECT OUTPUT 
INTERMED OBJECT 



/EXEC OBJ*(l,SYSTEM,DX0LE) MEM*(300, 12000,3000) PRTY*fl,15)f 

/ TIME«.l MEM|«MEML 

/ASSIGN 5 DISCI PILE*(TEMP, OBJECT) DELETE BUFFERS*1 \ 

/ASSIGN 6 SC DEVlCEnDLSTL FlLEt*PL3T BUFFER8M 

/ASSIGN 8 DISCI DEVICEt*DLM FILE*(USEr01,GO) FILEl*FLM| 

/ REPLACEl«RLM BUFFERSM RELRECl 

/ ACCE3S»(ANY,ANY#ANYfANY) ACcESSl*CLM| 

/ ALLOCATE«(li,0,32,lB) ALLOCATE|*LLM LRECL'64 ' 

/ASSIGN 9 DISCI PILE«(SYSTEM,USrFTN) BUFFERS»2 f 

/ASSIGN 10 DISCI FILE-CTEMP, PHASED DELETE BUFFERS*! 

/ASSIGN 13 DISCI PILE*(TEHP,SCRR) NEW DELETE BUFFER3*1 RELREC; 

/ ACCESS"(ANY,ANY,ANY,ANY) AlLOCATE*(!0,3i0, 128, 10)1. RELREC SCRATCH 

/ LRECL»100 

/END 



PRIMARY INPUT/CON 
LOADMAP LIST/ERR 



LOAD MOD OUTPUT 
LIBRARY 
LINKSEQ SCRATCH 
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,# CREATE FTNPSi. COMMENT, "FORTRAN PHASE 1 COMPILE ■ 

/REPLACE FTNPSi , FORTRAN PH^SE i COMPILE . 

/EXEC 0BJ«(1, SYSTEM, FTN) MEM«(300, 8000, 1000) PRTY«(1,15)> 



TIME«-1 MEMj»MEM PRTYj«pRI TlMEl«TIM 
DUMMY 0EVICE!«DMSG SHARE 

5 DISCI DEVlCEf«DSRC FIlEi»FSrC BUFFERS»1 

6 SC DEVICEl»DLST FlLF|«FLsT SHARES«SLST BUFFERS*!. 

7 DISCI DEVICEI«DINT FlLEt»FlNT BUFFERS»1 LINKSEQ/ 
ACCESS«(ANY,ANY,ANY#ANY) ALL0CATE«(1. 0,64, 30)1 
NEW|«NlNT REPLACEl«RlNT ACCESSt*CINT ALLOCATE J«LINT 



/ASSIGN 

/ASSIGN 

/ASSIGN 

/ASSIGN 

/ 

/ 

/END 

.# CREATE FTNPS2, COMMENT, "FORTRAN PHASE 2 COMPILE " 

/REPLACE FTNPS2 . FORTRAN PHASE 2 COMPILE . 

/EXEC 0BJ«(1, SYSTEM, FTNPS2) MEM«(300, 8000, 1000) PRTY»fl,l5)> 



SYSTEM MESSAGE 

SOURCE INPUT 

SOURCE LIST/ERROR 

SOURCE SCRATCH 



TIME«-l MEMj.MEM PRTYi«PRI TIME»«TIM 
DUMMY DEVICEt«DMSG SHARE 

6 SC DEVICEI«DLST FlLEf«FLsT SHAREl«SLST BUFFERSM. 

7 DISCI DEVICE»«D0BJ FIlE:»FObJ BUFFERS-1 LINKSEQ; 
ACCESS»(ANY,ANY,ANY#ANY) ALLOCATE«(1.0,64,10)^ 
NEW»«NOBJ REPLACEl«ROBJ ACCeSS»»COBJ ALLOCATE »«LOBJ 

8 DISCI DEVICE!»DINT FlLF|«FlNT BUFFERS»1 



/ASSIGN 

/ASSIGN 

/ASSIGN 

/ 

/ 

/ASSIGN 

/END 

,♦ CREATE HELP , COMMENT, "H-E-L-P OPERATOR ■ 

/REPLACE HELP . H-E-L-P OPERATOR . 

/EXEC OBJ«(l, SYSTEM, DXCOPY) MEM«(300, 3700, 1500) PRTY»fi,15)| 



TIME»-l MEM!«MEM PRTYI«PRl TIMEl»TIM 

5 DUMMY 

6 SC DEVICEl-DLST 

7 Dummy 

8 DISCI FILE»(SYSTEM,HELP) buffers«i 



/ASSIGN 

/ASSIGN 

/ASSIGN 

/ASSIGN 

/END 

,# CREATE INJTSP. COMMENT. "INITIAL BATCH OUT SPOOL FILE" 

__ _. .__ _..-___ .k>_wv.i w -»r i-i.v^u niivniiv ennni Co rri C 

/RtPLALt IrtlTSf • l«lliALi£t D»iin uuirui oruuutn rjui. 

/EXEC 0BJ«(1, SYSTEM, INITSP) MEM»(300,300,700) PPTY»(1.5)J 



TIME»-1 PRTYl»PRI 
6 DISCI DEVICEI«DS0Q FlLE«(SYSTEM,30Q) REPLACE* 

BUFFERS«1 RELREC ACCEsS«(CREAT.CREAT,CREAT.CREAT) I 
ALL0CATE«(1, 0,32,1) LRECL-64 



/ASSIGN 

/ 

/ 

/END 

,# CREATE IPLINK, COMMENT, "LINK IpL PROGRAM ■ 

/REPLACE IPLINK . LINK IPL PROGRAM . 

/EXEC OBJ«(i,SYSTEM-DXOLE) MEM«(300. 15000,6000) PRTY«(1,2)I 

/ TIME«»1 MEMi«MEM 

/ASSIGN 1 DISCI DEVICEI«DIPL FIlE»(SY8TEM,DXLPF) FILEt«FIPLl, 

/ BuFFERS«3 BUFFERSJfBIpL • 

/ASSIGN 5 DISCI DEVICEI«DIN FlLEi»FlN BUFFERS«1 \ 

/ASSIGN 6 SC DEVlCEl«DLST FIlEi«FLsT BUFFERS«1 

/ASSIGN 8 DISCI DEVICEl«DLM FILE«(USER01.IPL) FlLEt«FLMJ 

/ REPLACE|«RLM BUFFERS*! RELREC* 

/ ACCESS»(ANY,ANY#ANY#ANY) aCcessi*clmi 

/ ALLOCATE«(6,0,32,6) ALLOCATEI'LLM LRECL«64 

/ASSIGN 9 DISCI DEVICEl»DLIB FlLE«(SYsTEM,U8RPLX) FlLEl-FLIB/ 

/ BUFFER3»2 

/ASSIGN 10 DISCI FILE«(TEMP,SCRL) NEW BUFFERS-1 LINK3EQI 

/ ACCESS«(ANY,ANY#ANY,ANY) ALLOCATE»(10,300,256,10) . 

/ASSIGN U DUMMY 

/ASSIGN 12 DUMMY 

/ASSIGN 13 DISCI FILE»(TEMP,SCRR) NEW BUFFERS*! RELRECI 

/ ACCESS»(ANY, ANY, ANY, ANY) ALLOCATE"(2.300r 128,2) % 

/ LRECL«100 

/END 



SYSTEM MESSAGE 
ERROR MMSSG&5 

OBJECT OUTPUT 

INTERMED ORJECT 



CONTROL/MESSAGE 

LISTING 

OUTPUT 

INPUT 



SOQ FILE 



IPL OBJECT IN 
PRIMARY INPUT/CON 
LOADMAP LIST/ERR 



IPL LOAD MOD OUT 
LIBRARY FILE 
LINKSEQ SCRATCH 
SYS EXT DEFS OPT 

RELREC SCRATCH 
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,# CREATE ITS , COMMENT, "INTERACTIVE TERMINAL SUBSYS, " 
/REPLACE ITS . INTERACTIVE TERMINAL SUBSYSTEM . 
/EXEC 0BJ»(1, SYSTEM, ITS) MEM»(300 # 8000,2000) PRTY»(2,1)I 



/ASSIGN 
/ASSIGN 
/ASSIGN 
/ASSIGN 
/ASSIGN 



PRIV TIME«-1 OBJt«OBJ MEM|«MEM PRTYl»PRI PROTt»PRO. 
1 DUMMY DEVlCEt-Tl SHArEi»S1 , 

SHARE|«S2 
SHArEi»S3 

SHArEi«S4 t 

SHARE|»S5 , 

SHARE t«S6 



3 Dummy devicei»t2 

5 dummy device»«t3 

7 dummy devicei«T4 

9 dummy devicei»T5 

/assign u dummy devicei«t6 

/ASSIGN 13 DUMMY DEVlCEl«T7 
/ASSIGN 15 DUMMY DEVlCEl«T8 

/assign 17 Dummy devicei»t9 r 

/ASSIGN 19 DUMMY DEVlCEt»T10 

/END 

,# CREATE JCL , COMMENT, "CREATE JCL PROCEDURE " 

/REPLACE JCL . CREATE JCL PROCEDURE . 

/EXEC 0BJ«U, SYSTEM, JCLTRN) MEM«(300, 7550, 1000) PRTY?fl,l5)» 

/ _ TIME«-1 MEM|«MEM PRTYi«pRI 

/ASSIGN 1 SC DEVICEI«DSRC FlLEi»FSRC BUFFERS»i 

/ASSIGN 2 SC DEVlCEt»DERR SHaREI-SeRR 

/ASSIGN 3 SC DEVICEl-DLST FlLEi»FLsT SHAREl«8LST BUFFERS«1. 

/ASSIGN 4 DISCI DEVICElPDOBJ FlLE«(SYSTEM,SJCBFL#AB) I 

/ FlLEt-FOBJ REPLACEI'ROBJ BUFFERS»2 iNDEXEDl 

/ ACCESS»(ANY»ANY# ANY, ANY) ACCESSt«COBJJ 

/ ALLOCATE«(1,0,96.20) ALLOCAjEMLOBJ KEYLEN-6 

/END 

,# CREATE JCLUP .COMMENT, "UPDATE JCL SOURCE AND BINARY" 

/REPLACE JCLUP . UPDATE JCL SOURCE AND BINARY FILES . 

/EXEC OBJ«(l, SYSTEM, JCLTRN) MEM« (300,7550, 1000) PRTY«(1,15)| 

/ TIME»«1 MEMt«MEM 

/ASSIGN 1 DISCI FILE»(SYSTEM,JCW0RK) BUFFERS-1 

/ASSIGN 2 SC DEVICEl»DERR , 

/ASSIGN 3 SC DEVICEl«DLST 

/ASSIGN 4 DISCI DEVlC£t»DOBJ FlLE»(SYSTEM,SJCBFL#AB)f 

/ FILEI'FOBJ REPLACEl»ROBJ BuFFERS«2 INDEXED* 

/ ACCESS»(ANY,ANY.ANY,ANY) ACCE3St«C0BJ» 

/ ALLOCATE»(1,0,96,32) ALLOCATEl«LOBJ KEYLEN-6 

/EXEC 0BJ«(1, SYSTEM, SMR) MEM«(300, 11500,2000) PRTY»(1.15)I 

/ TIME--1 MEM1-MEM 

/ASSIGN DUMMY m m r 

/ASSIGN 4 DISCI FILE»(3YSTEM, JcLCUP) DELETE BUFFER3«1 

/ASSIGN 6 DUMMY > r 

/ASSIGN *15 DISCI FILE«(SVSTEM, JcLSRC) BUFFERS-1 r 

/ASSIGN *22 DUMMY . „ 

/ASSIGN ,25 DISCI FILE«(TEMP, JCLFlL) NEW LINK8EQ BUFFERSPlf , 

/ ACCESS«(ANY,ANY,ANY,ANY) AlL0CATE»<7, 300, 256,30) f 

/ASSIGN *26 DUMMY - r 

/ASSIGN >35 DISCI FILE«(SY8TEM, JCWORK) BUFFERS«1 

/EXEC OBJ»(l, SYSTEM, SMR) MEM. (30i, 1 1500,2000) PRTY»U.15)I 

/ TIME»«1 MEMI-MEM 

/ASSIGN DUMMY r 

/ASSIGN 4 DUMMY r 

/ASSIGN _6 DUMMY r 

/ASSIGN #15 DISCI F1LE-CTEMP, JCLFlL) BuFFERS-1 r 

/ASSIGN *22 DUMMY .- r 

/ASSIGN >25 DISCI FILE»<SY3TEM, JCLSRC) BUFFERS«1 r 

/ASSIGN *26 DUMMY 

/END 



TERMINAL 


1 


TERMINAL 


2 


TERMINAL 


3 


TERMINAL 


4 


TERMINAL 


5 


TERMINAL 


6 


TERMINAL 


7 


TERMINAL 


8 


TERMINAL 


9 


TERMINAL 


10 



SOURCE INPUT 
ERROR MESSAGE 
SOURCE LISTING 



OBJECT OUT FILE 



SOURCE INPUT 
ERROR MESSAGE 
SOURCE LISTING 



OBJECT OUT FILE 



ERROR/USER MSG 

CONTROL 

LISTING 

OLD LIBRARY FILE 

COMPILE OUT FILE 

NEW LIBRARY FILE 
JCL UPDAT CON OUT 
INCLUDE 



ERROR/USER MSG 

CONTROL 

LISTING 

OLD LIBRARY FILL 

COMPILE OUT FILL 

NEW LIBRARY FILL 

JCL UPDAT CON OUT 
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,# CREATE LIBBLO, COMMENT, "BUILD LIBRARY FILE ■ 

/REPLACE LIBBLD • BUILD LIBRARY FILE . 

/EXEC 0BJ*(1, SYSTEM, LIBBLD) MEM*(300, 2000,1000) PRTY«(1.15)| 



TIME«-1 MEMt.MEM PRTY t *PRI TlMEl*TIM 

MT1 DEVlCEt*DOBJ FIlEi*FObJ BUFFERS«i 

SC DEVICEl»DLST FlLEj«FLST SHAREl*SLST BUFFERS*! 

DISCI DEVICEl«DLIB FlLE|«FLlB REPLACEl*RLIB| 

BUFFERS-2 INDEXED ACCeSS«(AnY,ANY,ANY,ANY) | 

ACCESSt«CLIB ALLOCATE.d, 0,128, 20) ALLOCATEt«LLIBj f 

KEYLEN'B 



/ASSIGN 5 

/ASSIGN 6 

/ASSIGN 9 

/ 

/ 

/ 

/END 

.* CREATE LINKUP. COMMENT, "LINK M D AND UPDATE L M FILE" 

/REPLACE LINKUP . LINK MODULE AND UPDATE LOAD MODULE FILE 

/EXEC 0BJ«(1, SYSTEM, DXOLE) MEM*(300. 12000,3000) PRTY«fl,l)> 

/ TIME*-I MEM|«MEML 

1 DUMMY DEVICE!*D0BJ FILEi«FObJ BUFFERS«2 

5 DISCI DEVICEI«DIN FILEt»FlN BUFFERS«1 '. 

6 SC DEVlCEl-DLST FlLEi«FLsT BUFFERS«1 

8 DISCI FILE«(TEMP,LM) NEW BUFFERSM RELREC LRECL«64l 
ACCESS«(ANY,ANY,ANY,ANY) ALLOCATE«(10, 300, 32.10) . 

9 DISCI DEVICE|«DPLX FlLE*CSYsTEM,USRPLX) FlLEt*FPLXl 

BUFFERS«2 



/ASSIGN 

/ASSIGN 

/ASSIGN 

/ASSIGN 

/ 

/ASSIGN 

/ 

/ASSIGN 10 DISCI FILE»CTEMP,SCRL) NEW DELETE BUFFERS«1I 

/ 
/ 



LINKSEO ACCESS»(ANY,ANY.ANY,ANV)» 
ALLOCATED 10, 300.256, 30) 



/ASSIGN 11 DISCI DEVICEI«DEXT FlLE*(SYsTEM,DXEXTD) FlLEl«FEXT» 

/ BUFFERS* 1 

/ASSIGN 13 DISCI FILE»(TEMP,SCRR) NEW DELETE BUFFERS*1 RELRECl 

/ ACCESS»(ANY,ANY,ANY,ANY) ALLOCATE*(10, 300, 128, 10)1 

/ LRECL*100 

/EXEC OBJ«(I, SYSTEM, LMUPDT) MEM*(300. 3000, 500) PRTY*(1,1)I 



TIME*-! MEM|«MEMU 

SC DEVICE i*0M3G 

SC DEVlCEl*DCON SH^REf-ScON 

DISCI FILEMTEMP.LM) BUFFERS*1 

DISCI 0EVICEI»DUPD FlLEf*FUPD BUFFERS*! 



/ASSIGN 4 

/ASSIGN 5 

/ASSIGN 6 

/ASSIGN 7 

/END 

,# CREATE LMUPDT, COMMENT, "LOAD MqDULE UPDATE " 

/REPLACE LMUPDT • LOAD MODULE UPDATE . 

/EXEC OBJsCt, SYSTEM, LMUPDT) MEM*(300, 3000,500) PRTY*(1,1)I 



/ASSIGN 
/ASSIGN 
/ASSIGN 
/ASSIGN 

/END 



TIME«*1 MEMI«MEM PRTYi«pRl TlMEl*TIM 

4 SC DEVICE!«DMSG 

5 SC DEVicEt«OCON FlLE|*FCoN gUFFER3«l 

6 DISCI DEVICEttDLM FILEl*FLM BUFFERS*1 

7 DISCI DEVICEt«DUPD FlLEi*FUpD BUFFERS*! 



OBJECT INPUT 
IDT/DEF LISTING 



OUTPUT LIB FILE 



SECONDARY OBJ IN 
PRIMARY INPUT/CON 
LOADMAP LIST/ERR 

LOAD MAD OUTPUT 

PLEXUS LIBRARY 
LINKSEQ SCRATCH 

SYSTEM EXT DEFS 

RELREC SCRATCH 



SYS I EM McSSAGc. 
CONTROL INPUT 
LOAD MODULE INPUT 
UPDATE FILE 



SYSTEM MESSAGE 

CONTROL INPUT 
LOAD MODULE INPUT 
UPDATE FILE 



,« CREATE 
/REPLACE 
/EXEC OBJ 
/ 

/ASSIGN 

/ASSIGN 

/ 

/ASSIGN 

/ASSIGN 

/ 

/ 

/ASSIGN 

/ 

/ 
/ 
/END 



LPFBLD, COMMENT, "UPDATE LINKABLE PARTS FILE " 
LPFBLD . UPDATE LINKABLE PARTS FILE , 
■ (1, SYSTEM, LPFBLD) MEN*(3ti,330f, 1MB) PRTYP(i,2)| 
TIME**1 06Jl«0BJ MEMtsMEM 
DUMMY DEVlCElaDCON , CONTROL 

9 DISCI DEVXCEl*DOBJ FILE*CUSER01 , A8M0UT) PXLEMPOBJf 



BUFFERS*! , 

6 SC DEVICElvDLST • 

7 DUMMY DEVICEI-DEXT FILEl*FEXT REPLACEl*REXTj 
BUFFER8*t LINKSEQ ACCE8S*(ANY,CREAT,CREAT,CREAT) I 
ACCESSUCEXT ALLOCATED! #0* 128,20) ALLOCATEl«LEXT , 

9 DISC! DEVICEI'OUPD FILEf*FUPO REPLACEl«RUPD| 
BUFFER8«2 INDEXED ACCE8S*CCREAT.CREAT,CREAT f CREAT) I 
ACCESSI-CUPD ALLOCATED!, 0,250, 10) ALLOCATEltLUPDl 
KEYLEN*6 • 



OBJECT INPUT 
LISTING 



EXTRACT FILE 



UPDATE FILE 



Change 1 
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.« CREATE L3TEDT, COMMENT, "LIST EolT FILE «• 

/REPLACE LSTEDT , LIST EDIT FILE • 

/EXEC 0BJ«(1, SYSTEM, LSTEDT) MEM«(300, 1700,650) PRTY«(l,15)f 

/ TIME«*1 MEHt«HEM PRTY|«PRI TIME|»TIM 

/ASSIGN 10 SC DEVlCEl«DL8T 

/ASSIGN 20 DISCI DEVlCEl«DIN FILEt«FlN BUFFERS«1 

/END 

,# CREATE PlALGO, COMMENT, "PLEXUS COMp, ILT. ASM, LINK, GO " 

/REPLACE PIALGO . PLEXUS COMpi L E, ILT. ASSEMBLE, LINK, ANH 

/EXEC OBJ«(t, SYSTEM, PLEXUS) MEM«(300.>94C0,2700) PRTY«C1,2)J 

/ TIME«7200 MEMt«MEM- 

/ASSIGN SC DEVICEl«DERR 

/ASSIGN 5 DISCI DEVlCEt«DSRC FlLEl«FsRC BUFFERSM '[ 

/ASSIGN 6 SC DEVICEl«DLSTC 

/ASSIGN #22 DISCI FILE»(TEMP,DATa) NE* BUFFERS-1 LINKSEQl 

/ ACCESS«(ANY,ANY.ANYfANY) ALLOCATE»(10,300, 160, 10)*. 

/ASSIGN #23 DISCI FILE»CTEMP,PROc) NEW BUFFERS-1 LINKSEGJ 

/ ACCESS«(ANY,ANY.ANYrANY) ALLOCATE«(10,300. 160, 10)'. 

/ASSIGN *25 DUMMY 

/EXEC 0BJ«(1, SYSTEM, ILT980) MEM«(300,>94C0,2500) PRTY»(1,2)> 

/ TIME»7200 MEMt«MEM 

/ASSIGN SC DEVICEf«DERR 

/ASSIGN 6 SC DEVICEt«DLSTI *. 

/ASSIGN #12 DISCI FILE«(TEMP,DATA) DELETE BUFFERS-1 . 

/ASSIGN *I3 DISCI FILE«(TEMP,PROc) DELETE BUFFER8«i 

/ASSIGN >14 DISCI FILE»(TEMP,SCRR) NEW 8UFFERS«1 RELREO 

/ ACCESS»(ANY,ANY,ANY,ANV) ALLOCATE»(10,300,128,10) I 

/ LRECL»«4 



SOURCE OUTPUT 
SOURCE INPUT FILE 



GO , 

ERROR MESSAGE 
SOURCE INPUT 
SOURCE LISTING 

DATA DIV INT CODE 

PROC DIV INT CODE 



ERROR MESSAGE 

PRINTOUT 

DATA DIV INT CODE 

PROC DIV INT CODE 



/ASSIGN *23 DISCI FILE»CTEMP, ILTOUT) N£W BUFFER8-1 LINKSEQ; 

/ ACCESS»(ANY,ANY.ANY#ANY) ALLOCATE-C10, 300. 128,30)' 

/ASSIGN >24 DISCI FILE»(TEMP,SCRr) BUFfERS«1 . 

/ASSIGN #30 DISCI FILE«(SYSTEM,M EF) SHARE BUFFERS-1 . 

/EXEC 0BJ«(1, SYSTEM, ASMBLR) MEN* (300,20000, 2000) PRTY»(1,2)J 

/ TIME»1800 

/ASSIGN DUMMY ' 

/ASSIGN 4 DUMMY , 

/ASSIGN 5 DISCI FILE"CTEMP f ILTOUT) DELETE BUFFERS-1 . 

/ASSIGN 6 SC DEVICEf-DLSTA 

/ASSIGN 7 DISCI FILE-tTEMP, OBJECT) NEW BUFFER3»1 LlNKSEOl 

/ . ACCESS-CANY, ANY*ANV,ANY) ALLOCATE-C10, 300, 128,20)'. 

/ASSIGN 16 DISCI FILE»(TEMP f SCRL) NEW BUFFERS-i LINKSEQJ 

/ ACCESS-CANY, ANY, ANY, ANY) ALLOCATE»C10, 300. 256, 30)1 

/EXEC OBJ»(l, SYSTEM, DXOLE) MEM-C300, 20000, 3000) PRTV«fl,2)| 

/ TIMEM800 

/ASSIGN 5 DISCI FILE-CTEMP, OBJECT) DELETE BUFFERS«1 ' 

/ASSIGN 6 SC DEVICE|«DLSTL . 

/ASSIGN 8 DISCI FILE«CTEMP,LM) NEW BuFFERS»l RELRECf 

/ ACCESS«CANY,ANY,ANY,ANY) ALLOCATE«C10,300.32,10)| 

/ LRECL"64 ' 

/ASSIGN 9 DISCI FILE«(SYSTEM,USRPLX) BUFFERS-2 , 

/ASSIGN 10 0ISC1 FILE«CTEMP,3CRL) DELETE BUFFERS*! , 

/ASSIGN 13 DISCI FILE»CTEMP,SCRR) DElETE BUFFER3M 

/EXEC 0BJ»C1,TEMP,LM) MEM»<300, 20000.3000) PRTY«(l,2)f 

/ TIME-1800 

/ASSIGN SC DEVICEf«DERR 

/ASSIGN 5 DISCI DEVICE|»DIN1 FILE|»FIN1 BUFFERSM 

/ASSIGN 6 3C DEVICEfsDOUTl 

/ASSIGN #|2 DUMMY DEVICE|«DIN2 FlLEt'FlN? BUFFERS-1 

/ASSIGN #22 DUMMY DEVICEt«D0UT2 FlLEl»F0UT2 BUFFERS»1 

/ASSIGN #J0 DUMMY DEVICE|«DF0 FlLCl»FF0 BUFFER8"1 

/ASSIGN #31 DUMMY DEVICE|«DF1 FlLEf'FFl BUFFERS«l 

/ENO 



REL REC SCRATCH 

ILT OUTPUT 

REL REC SCRATCH 

MACHINE DESCRIPT 



SYSTEM MESSAGE 
CONTROL/MESSAGE 
ASSEMBLY INPUT 
ASSEMBLY LISTING 

OBJECT OUTPUT 

ASSEMBLY SCRATCH 



PRIMARY INPUT/CON 
LOADMAP LIST/EPR 



LOAD MOD OUTPUT 
LIBRARY 

LINKSEQ SCRATCH 
RELREC SCRATCH 



ERROR MESSAGE 
PRIMARY INPUT 
PRIMARY OUTPUT 
SECONDARY INPUT 
SECONDARY INPUT 
FILE 
FILE 1 
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.# CREATE PlALNK, COMMENT, "PLEXUS CQMP, ILT, ASM, AND LINK" 
/REPLACE PIALNK • PLEXUS CQMpJxE. ILT, ASSEMBLE, AND LINK 
/EXEC 0BJ«(1, SYSTEM, PLEXUS) MEM«(300,>94C0, 2700) PRTY«(1,2)» 
/ TIME"7200 MEMJ»MEM 

/ASSIGN SC DEVICE|«DERR 

/ASSIGN 5 DISCI DEVICEi»DSRC FiLEl«FsRC BUFFERS'l 
/ASSIGN 6 SC DEVlCEt«DLSTC 

/ASSIGN >22 DISCI FILE« (TEMP, DATA) NEW BUFFERS"1 LINKSEQJ 
/ ACCESS»(ANY,ANY,ANY,ANY) AlLOCATE«( 10,300. 160, 10) 

/ASSIGN *23 DISCI FILE" (TEMP,PROc) NE* BUFFERS"! LINKSEOJ 
/ ACCESS»(ANY,ANY.ANY,ANY) ALLOCATE* ( 1 0, 300. 160, 10) 

/ASSIGN >25 DUMMY 

/EXEC 0RJ«(1, SYSTEM, ILT980) MEM" (300, >94C0, 2500) PRTY«(i,2)| 
/ TIME«7200 MEMt«MEM 

/ASSIGN SC DEVIC£:«DERR 
/ASSIGN 6 SC DEVICE|«DLSTI 

/ASSIGN >J2 DISCI FILE»(TEMP,DATA) DELETE BUFFERS"! 
/ASSIGN >13 DISCI FILE- (TEMP, PROc ) DELETE BUFFEPS»1 
/ASSIGN >H DISCI FILE* (TEMP, SCRR) NEW BUFFERS"1 RELREC) 
/ ACCESS«(ANY,ANY.ANY#ANY) ALLOCATED 10,300. 128. 10) 

/ LRECL'64 

/ASSIGN >23 DISCI FILE" (TEMP, ILTOUT) New BUFFERS«1 LlNKSEQf 
/ ACCESS«(ANY,ANY,ANY#ANY) ALLOCATE" ( 10,300. 128,30) 

/ASSIGN >24 DISCI FILE"(TEMP,SCRR) BUFFERS«1 
/ASSIGN >30 DISCI FILE»(SYSTEM,MdEF) SHARE BUFFFRS"1 
/EXEC 0BJ»(1, SYSTEM, ASMBLR) MEM"(300, 20000, 2000) PRTY«(1,2)| 
/ TIME"1800 

DUMMY 

DUMMY 

DISCI FILE"(TEMP,ILT0UT) DELETE BUFFERS"1 

SC DEVICE|"DLSTA 

DISCI FILE"(TEMP, OBJECT) NEW BUFFERS"! LlNKSEQf 

ACCESS" (ANY, ANY, ANY, ANY) ALLOCATE" (10, 300. 128,20) 
16 DISCI FILE"(TEMP,SCRL) NEW BUFFERS-i LINK8EQI 

ACCESS" (ANY, ANY. ANY, ANY) ALLOCATE" ( 1 0,300,256,30) 



/ASSIGN 

/ASSIGN 

/ASSIGN 

/ASSIGN 

/ASSIGN 

/ 

/ASSIGN 

/ 

/EXEC 0BJ"(1, SYSTEM, DXOLE) MEM»(300, 20000, 3000) PRTY«M.2)| 

/ TIME"1800 

/ASSIGN 5 DISCI FILE»(TEMP, OBJECT) DELETE BUFFERS"! 

/ASSIGN 6 SC DEVICE|«DLSTL 

/ASSIGN 8 DISCI DEVICEl"DLM FILE«(USEr01»GO) FILEl"FLM| 

/ REPLACEl"RLM BUFFERS"! RELRECJ 

/ ACCE'SsCANY, ANY, ANY? ANY) ACcE3S!"CLM» 

/ ALLOCATE"(10,0,32,i0) ALLOCATE|"LLM LRECL-64 

/ASSIGN 9 DISCI FILE"(SYSTEM,UsRPLX) BUFFER§"2 

/ASSIGN |0 DISCI FILE"(TEMP,SCRL) DELETE BUFFERS"! 

/ASSIGN 13 DISCI FILE"(TEMP,SCRR) DELETE BUFFERS"1 

/END 

.# CREATE PLEXGO, COMMENT, "EXECUTE PLEXUS GENERATED L M" 

/REPLACE PLEXGO • EXECUTE PLEXUS GENERATED LOAD MODULE , 

/EXEC OBJ»(1,USER01#GO) MEM«(300, 12000,1000) PRTY»(4 f 15)l 

/ TIME-I800 OBJ|"OBJ MeM|«mEm PRTYt"PRI TIMEl«TIM 

/ASSIGN SC DEVlCEl"DERR 

/ASSIGN 5 DISCI DEVICEl"DINl 

/ASSIGN 6 SC DEVICE|"D0UT1 

/ASSIGN >12 DUMMY DEVICE|"DIN2 

/ASSIGN >J3 DUMMY DEVICE|»DIN3 

/ASSIGN >22 DUMMY DEVICEl"DOUT2 FlLEl«F0UT2 BUFFERS"1 

/ASSIGN ^2.3 DUMMY DEVICE|"D0UT3 PlLEl«F0UT3 BUFFERS"1 

/ASSIGN *30 DUMMY DEYICEl»DF0 FlLEt"FF0 BUFFERS"1 

/ASSIGN *3! DUMMY DEVICE|"DF1 FlLE»«FFl BUFFERS"! 

/END 



FILE|»FIN1 BUFFERS"1 

FILE«»FIN2 BUFFERS"! 
FILE|«FIN3 BUFFERS"! 



ERROR MESSAGE 
SOURCE INPUT 
SOURCE LISTING 

DATA DIV INT CODE 

PROC DIV INT CODE 



ERROR MESSAGE 

PRINTOUT 

DATA DIV INT CODE 

PROC DIV INT CODE 



REL REC SCRATCH 

ILT OUTPUT 

PEL REC SCRATCH 

MACHINE DESCRIPT 



SYSTEM MESSAGE 
CONTROL/MESSAGE 
ASSEMBLY INPUT 
ASSEMBLY LISTING 

OBJECT OUTPUT 

ASSEMBLY SCRATCH 



PRIMARY INPUT/CON 
LOADMAP LIST/ERR 



LOAD MOD OUTPUT 
LIBRARY 

LINUSEQ SCRATCH 
RELREC SCRATCH 



ERROR MESSAGE 
PRIMARY INPUT 
PRIMARY OUTPUT 
SECONDARY INPUT 
TERTIARY INPUT 
SECONDARY OUTPUT 
TERTIARY OUTPUT 
FILE 
FILE 1 
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.* CREATE PLEXIA, COMMENT, "PLEXUS COMPILE, ILT, AND ASM" 

/REPLACE PLEXIA . PLEXUS COMpi L E. ILT. AND ASSEMBLE . 

/EXEC OBJ«(I, SYSTEM, PLEXUS) MEM«(300.>94C0,2700) PRTY«(1,2)I 

/ TIME»7200 MEMi«MEM TlMEi«TlM 

/ASSIGN SC DEVICEl«DERR 

/ASSIGN 5 DISCI DEVICEt»DSRC FlLEt»FsRC BUFFERS'! 

/ASSIGN 6 SC DEVICEl«DLSTC FlLEi«FLST BUFFERS»i 

/ASSIGN *2? DISCI FILE«(TEMP,DATA) NE* BUFFERS-1 LINKSEO* 

/ ACCESS»(ANY,ANV,ANY,ANY) ALLOCATED 10,300. 160, 10) . 

/ASSIGN >23 DISCI FILE«(TF.MP,PR0C) NEW BUFFERS'! LINKSEQl 

/ ACCESS«(ANY,ANY,ANY#ANY) ALLOCATE»(10,300. 160, 10) . 

/ASSIGN >25 DUMMY 

/EXEC OBJ«U, SYSTEM, ILT980) MEM»(300,>94C0,2500) PRTY«(1,2)I 

/ TIME«7200 MEM|«MEM TlMEi«TlM 

/ASSIGN SC DEVICEl«DERR 

/ASSIGN 6 SC DEVICE|«DLSTI FlLEi«FLST BUFFERSM 

/ASSIGN *12 DISCI FILE«(TEMP,DATA) DELETE BUFFERSM f 

/ASSIGN >13 DISCI FILE»(TEMP,PR0O DELETE BUFFERSM 

/ASSIGN *14 DISCI FILE« (TEMP,SCRR) NEW BUFFERSM RELRECI 

/ ACCESS»(ANY,ANY,ANYrANY) ALLOCATEM10.300.128, 10) I 

/ LRECL«64 

/ASSIGN >23 DISCI FILEMTEMP, ILTOUT) N£W BUFFERSM LINKSEQl . 

/ ACCESS»(ANV,ANY,ANY#ANY) ALLOCATE«(10#300.128,30) / . 

/ASSIGN *24 DISCI FILEMTEMP, SCRR) DELETE BUFFERSM , 

/ASSIGN >30 DISCI FUEMSYSTEM,MoEF) SHARE BUFFERSM 

/EXEC 0BJ»(1, SYSTEM, ASMBLR) MEM»(300. 20000, 2000) PRTY«(1,2)I 

/ TIMEM800 

/ASSIGN DUMMY ' f 

/ASSIGN 4 DUMMY r 

/ASSIGN 5 DISCI FILEMTEMP, ILToUT) BuFFERSM . 

/ASSIGN 6 SC DEVICE|«DLSTA FlLEt'FLST BUFFERSM 

/ASSIGN 7 DISCI DEVICEi»DOBJ FlLEMUsER01,A8MOUT) FILEt»F0BJl 

/ REPLACE BUFFERS.l LlNKSEO ACCESSMANY,ANY,ANY,ANYJI 

/ ACCESSt'COBJ ALLOCATE>(1,0. 128,20) ALLQCATEl'LOBJ. 

/ASSIGN 16 DISCI FILE«(TEMP,SCRD NEW BUFFERSM LINKSEQl 

/ ACCESS«(ANY,ANY.ANY,ANY) ALLOCATE»(10,300,256,30) . 

/END 



FRROR MESSAGE 
SOURCE INPUT 
SOURCE LISTING 

DATA DIV INT CODE 

PROC DIV INT CODE 



ERROR MESSAGE 

PRINTOUT 

DATA DIV INT CODE 

PROC DIV INT CODE 



REL REC SCRATCH 

ILT OUTPUT 

REL REC SCRATCH 

MACHINE DESCRIPT 



SYSTEM MESSAGE 
CONTROL/MESSAGE 
ASSEMBLY INPUT 
ASSEMBLY LISTING 



OBJECT OUTPUT 
ASSEMBLY SCRATCH 
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.# CREATE PLEXUP, COMMENT, "PLEXUS GENERATED UPDATE LPF " 

/REPLACE PLEXUP . PLEXUS COMplLE, ILT. ASSEMBLE MODULE AND 

/EXEC 0BJ*(1, SYSTEM, PLEXUS) MEM«(300,>94C0,2700) PRTY«(1,2)J 

/ TIME«7200 MEM|«MEM TlMEi*TlM 

/ASSIGN SC DEVICE|«DERR 

/ASSIGN 5 DISCI DEVlCEf*DSRC FlLEl*FSRC BUFFERS*! 

/ASSIGN 6 SC DEVICE««DLSTC FlLE»«FLST BUFFERS»1 

/ASSIGN >22 DISCI FILE*(TEMP,DATa) NEW BUFFER3*1 LINKSEQI 

/ ACCESS«(ANY,ANY,ANY,ANY) ALLOCATED 1 0, 300. 160, 10) 

/ASSIGN #23 DISCI FILE*<TEMP,PROc) NEW BUFFERS*! LINKSEQ; 

/ ACCESS«(ANY,ANY.ANY#ANY) ALLOCATE" ( 10,300. 160, 10) 

/ASSIGN >25 DUMMY 

/EXEC OBj«Ci, SYSTEM, ILT980) MtM*(300,*94CB,2580) PRTY«{!,2)J 

/ TIME«7200 MEM|«MEM TlMEi*TlM 

/ASSIGN SC DEVICEi«DERR ' r 

/ASSIGN 6 SC DEVICE»«DLSTI FlLEt*FLST BUFFERS*! 

/ASSIGN *\7 DISCI FILE»(TEMP,DATa) DELETE BUFFEPSM 

/ASSIGN >13 DISCI FILE«(TEMP,PROc) DELETE BUFFERSM 

/ASSIGN #14 DISCI FILE«(TEMP,SCRR) NEW BUFFERS«1 RELRECJ 

/ ACCESS«(ANY#ANY,ANYrANY) ALLOCATE* ( 10,300. 1 28, 10) * 

/ LRECL*64 

/ASSIGN ..23 DISCI FILE*(TEMP, ILToUT) NEW BUFFER9«1 LINKSEQ; 

/ ACCESS»(ANY,ANY,ANY, ANY) AlLOCATE«( 10, 300,128,30)'. 

/ASSIGN #24 DISCI FILE«(TEMP,SCRR) DELETE BUFFERS«1 

/ASSIGN #30 DISCI FILE*(8YSTEM,M D EF) SHARE BUFFERS*! 

/EXEC OBJ«(i, SYSTEM, ASMBLR) MEM*<300, 20000, 2000) PRTY*(1,2)J 

/ TIME*1800 

/ASSIGN DUMMY 

/ASSIGN 4 DUMMY 

/ASSIGN 5 DISCI FILE«(TEMP, ILToUT) DELETE BUFFER3*1 

/ASSIGN 6 SC DEVICE|*DLSTA FlLEi'FLST BUFFERS«1 

/ASSIGN 7 DISCI FIL£*(TEMP, ASMoUT) New BUFFERS"! LINKSEQ? 

/ ACCESS«(ANY,ANY 9 ANY,ANY) ALLOCATE* (10-300, 128.20)1 

/ASSIGN 16 DISCI FiLE«(TEMP,SCRL) NEW DELETE BUFFERS-1J 

/ LINKSEQ ACCESS«(ANY,ANY,ANY,ANY)I 

/ ALLOCATE«(10,300,256,30) 



n 


UPDATE l.PF . 


r 


ERROR MESSAGE 
SOURCE INPUT 
SOURCE LISTING 


• 


DATA DIV INT CODE 


'. 


PROC DIV INT CODE 



TIME*-t 
DUMMY ' 

5 DISCI DEVICEl*DOBJ FiLE*(TEMP, ASMOUT) BUFFERS*1 . 

6 SC DEVICEl*DLSTU FlLEi*FLST BUFFERS-1 
9 DISCI DEVICEl*DUPD FlLE*(SYSTEM,DXLPF) FlLEl«FUPD; 

BUFFERS*2 



/ASSIGN 

/ASSIGN 

/ASSIGN 

/ASSIGN 

/ 

/END 

,# CREATE RE3TLP, COMMENT, "RESTORE LPF FROM MT TO DISC " 

/REPLACE RESTLP . RESTORE LPF FROM MAG TAPE TO DISC . 

/EXEC 0BJ*(1, SYSTEM, DXCOPY) MEM*(300, 4000, 3000) PRTY»fl,2)» 

/ TIME««1 MEM|*MEM 

/ASSIGN 5 DUMMY DEVICEl*DCON 

/ASSIGN 6 SC DEVICEl*DLST FlLEi*FLST BUFFER3*1 

/ASSIGN 7 DISCI DEVICEl*DOUT FlLE*(SYsTEM.LPF) FlLEl*FOUT> 

/ REPLACE BUPF€RS»2 BUFFER3i«B0UT INDEXED! 

/ ACCESS*(ANY,ANY#ANY,ANY) ACcE88l»C0UT» 

/ ALL0CATE»(2, 0,128,50) ALLOCaTEipLOUT KEYLEN*6 

/ASSIGN 8 MT1 DEVICE!«DIN FlLEi*FlN BUFFERS*2 

/ENO 



ERROR MESSAGE 

PRINTOUT 

DATA DIV INT CODE 

PROC DIV INT CODE 



REL REC SCRATCH 

ILT OUTPUT 

REL REC SCRATCH 

MACHINE DESCRIPT 



SYSTEM MESSAGE 
CONTROL/MESSAGE 
ASSEMBLY INPUT 
ASSEMBLY LISTING 

OBJECT OUTPUT 



ASSEMBLY SCRATCH 



CONTROL 
OBJECT INPUT 
UPDATE LISTING 

UPDATE FILE 



CONTROL/MESSAGE 
LISTING 



OUTPUT 
INPUT 
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,# CREATE SMR ,C0MMENT, "SOURCE MAINTENANCE ROUTINE " 

/REPLACE SMR , SOURCE MAINTENANCE ROUTINE . 

/EXEC OBJ-O, SYSTEM, SMR) MEM«(300, 11500, 50100) PRTY»(1.I5)I 

/ TIME«-t MEM|«MEM 

/ASSIGN SC DEVICEl«DMSG 

/ASSIGN 4 SC DEVICE|»DCON FlLEl«FcON BUFFERS*! 

/ASSIGN 6 DUMMY DEVICE|»DLST FiLEt«FLST BUFFERS-1 

/ASSIGN *J5 MTl DEVICE|«DOLD FREI-FOLD BUFFERS"! LINKSEQ 

/ASSIGN >22 DUMMY DEVlCE|«DCOM FiLEl«FcOM REPLACE»«RCOMJ 

/ buffers«1 linkseq access»(any,any, any, any) i 
/ allocatemlcom 

/ASSIGN -»25 DUMMY DEVICE|»DNEW FiL£!»FnEW R£PLACEt»RNEW* 

/ BUFFERS'l LINKSEQ ACcEs3«(ANY,ANY,ANY,ANY)| 

/ ALLOCATEt«LNEW 

/ASSIGN >?6 DUMMY 

/ASSIGN >35 DUMMY DEVICEt»DEV35 FlLEl«FlL35 BUFFERS»2 

/ASSIGN >45 DUMMY DEVICEt «DEV45 FlLE««FlL45 BUFFERS"2 

/END 

.# CREATE SMRASM, COMMENT, "SMR, ASM, AND UPDATE LPF " 

/REPLACE SMRASM . SMR, ASM, UPDATE LPF . 

/EXEC 0BJ»(1, SYSTEM, SMR) MEM«(300, 1 1500,5000) PRTY«(l.l5)l 

/ TIME--1 

/ASSIGN DUMMY 

/ASSIGN 4 SC DEVICEl«DCON FREt-FcON BUFFERS-1 

/ASSIGN 6 DUMMY DEVICE|»DLST 

/ASSIGN >15 MTl DEVICEi»OOLD FiLEl«FoLD BUFFERS»1 

/ASSIGN >22 DISCI FILE«CTEMP,3MRwRK) N£W BUFFERS-1 LINKSEQ* 

/ ACCESS»(ANY,ANY,ANV,ANY) A|_L0CATE«(2, 300, 128,20) 

/ASSIGN *25 DUMMY 

/ASSIGN ^26 DUMMY 

/ASSIGN >35 DUMMY 

/ASSIGN >45 DUMMY 

/EXEC 0BJ«(1, SYSTEM, A3MBLR) MEM«(300, 20000, 2000) PRTY»tl,2)J 



TIME«1800 
DUMMy ' 

4 DUMMY , 

5 DISCI FILE»(TEMP,SMRwRK) DELETE BUFFERS*! 

6 SC DEVICE|«DL3T 

7 DISCI FILE«(TEMP,ASM UT) NEW BUFFERS-1 LlNKSEQl 
ACCESS»(ANY,ANY,ANY,ANY) ALLOCATED 10, 300. 126,30)'. 

16 DISCI FILE«(TEMP,SCRL) NEW DELETE BUFFERS»1» 
LINKSEQ ACCESS>(ANY,ANY,ANY,ANY)| 
ALLOCATE- C 10,300,256.30) 



/ASSIGN 
/ASSIGN 
/ASSIGN 
/ASSIGN 

/ 
/END 



TIME--1 
DUMMY \ 

5 DISCI FILE«(TEMP,ASMoUT) BuFFERS«l , 

6 SC DEVICEl»DLST 

9 DISCI DEVICEf«DUPD FlLE»(SYSTEM,DXLPF) FlLEt'FUPD; 
BUFFERS-2 



ERROR/USER MSG 

CONTROL 

LISTING 

OLD LIBRARY FILL 



COMPILE OUT FILL 



NEW LIBRARY FILL 
JCL UPDAT CON OUT 
INCLUDE l.UN OPT 1 
INCLUDE l.UN OPT 2 



ERROR/USER MSG 

CONTROL 

LISTING 

OLD LIBRARY FILL 

COMPILE OUT FILL 
NEW LIBRARY FILL 
JCL CON OUT FILL 
INCLUDE LUN OPT 
INCLUDE LUN OPT 



SYSTEM MESSAGE 
CONTROL/MESSAGE 
ASSEMBLY INPUT 
ASSEMBLY LISTING 

OBJECT OUTPUT 



ASSEMBLY SCRATCM 



CONTROL 
OBJECT INPUT 
UPDATE LISTING 

UPDATE FILE 
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•# CREATE SMRPLX, COMMENT, "SMR, PLEXUS, ILT, ASM, UPDAT LPF" 
/REPLACE SMRPLX • SMR, PLEXUS, ILT, ASM, UPDATE LPF , 
/EXEC 0BJ*(1, SYSTEM, SMR) M£M«(300, 11500,5000) PRTY*(1.15)> 
/ TIME»-1 

/ASSIGN DUMMY 

SC DEVICE|»DCON FlLEt*FcON BUFFERS«1 '. 

DUMMY DEVICE:«DLST 

MTl DEVICEf«DOLD FiLEl*FoLD BUFFERS*1 

DISCI FILE*(TEMP,SMRwRK) NEW BUFFER3*1 LINKSEQ; 

ACCESS«(ANY,ANY,ANY,ANY) ALLOCATE* (?, 300, 128,30) '. 

DUMMY 

DUMMY 

DUMMY 

DUMMY 
I, SYSTEM, PLEXUS) MEM«{300,>94C0,2500) PRTY»(i,2)| 

TIME«7200 MEM:»MEM 

DUMMY 
ISC1 FILE«(TEMP,SMRWRK) BUFFERS*! 

SC DEVICEj*DLST 

DISCI FILE«(TEMP,DATA) NEW BUFFERS«1 LINKSEQ; 

ACCESS* (ANY, ANY. ANY, ANY) ALLOCATE* ( 1 0, 300. 160, 1P>) '. 

DISCI FILE*(TEMP,PR0O MEW BUFFERS-1 LINKSEQ; 

ACCESS* (ANY, ANY, ANY, ANY) ALLOCATE* ( 10, 300. 160, 10) '. 

DUMMY 
i, SYSTEM, ILT9B0) MEM*(300,>94C0,2500) PRTY«(1#2)I 

TIME«7200 MEM|»MEM 

DUMMY ' 

SC DEVICEi«DLST 

DISCI FILE«(TEMP,DATa) DELETE BUFFERS*! 

DISCI FILE«(TEMP,PR0c) DELETE BUFFERS«1 

DISCI FILE*(TEMP,SCRR) NEW BUFFERS-1 RELRECI 

ACCESS* (ANY, ANY, ANY, ANY) ALLOCATE* ( 10,300, 128, 10) 1 

i PEC *64 

DISCI FILE*(TEMP,ILToUT) New BUFFERS*! LINKSEQ; 

ACCESS* (ANY, ANY, ANY, ANY) AlLOCATE«( 10, 300. 128,30)' 

DISC! FILE*(TEMP,SCRR) DELETE BUFFERS*1 

DISCI FILE«(SYSTEM,M D EF) BuFFERS«l 
1, SYSTEM, ASMBLR) MEM*(300, 20000, 2000) PRTY«(1,2)> 

TIME*1800 

DUMMY \ 

DUMMY 

DISCI FILE*(TEMP,ILT0UT) DELETE BUFFERS'l 

SC DEVICEt*DLST \ 

DISCI FILE«(TEMP,SMRWRK) BuFFERS*l 

DISCI FILE*(TEMP,SCRL) NEW DELETE BUFFERS*!! 

LINKSEQ ACCESS*(ANY,ANY,ANY,ANV)| 

ALLOCATE* (10, 300, 256, 30) 
1, SYSTEM, LPFBLD) MEM*(300, 8000, 3000) PRTY*fl,2)| 

TIME«-1 

DUMMY \ 

DISCI FILE*(TEMP,SMRWRK) BuFFERS*l 

SC DEVICEi«DLST 

DISCI DEVICEt«DUPD FlLE»(3YSTEM,DXLPF) FlLEt*FUPD/ 

BUFFERS*2 



/ASSIGN 


4 


/ASSIGN 


6 


/ASSIGN 


'15 


/ASSIGN 

/ 

/ASSIGN 


'22 


'25 


/ASSIGN 


-•26 


/ASSIGN 


*35 


/ASSIGN 


'45 


/EXEC OBJ«( 


/ASSIGN 





/ASSIGN 


5 D 


/ASSIGN 


6 


/ASSIGN 
/ 

/ASSIGN 
/ 

/ASSIGN 


'22 


'23 


'25 


/EXEC OBJ«( 


/ 




/ASSIGN 





/ASSIGN 


6 


/ASSIGN 


'12 


/ASSIGN 


'13 


/ASSIGN 
/ 


'14 


/ASSIGN 


>23 


/ 

/ASSIGN 


*24 


/ASSIGN 


'30 


/EXEC OBJ«( 


/ 




/ASSIGN 





/ASSIGN 
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/ASSIGN 
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/ASSIGN 


6 


/ASSIGN 


7 


f f^ ^ JJ j^ ^ p| 


16 


/ 




/ 




/EXEC OBJ*( 


/ 




/ASSIGN 





/ASSIGN 


5 


/ASSIGN 


6 


/ASSIGN 


9 


/ 




/END 





ERROR/USER MSG 

CONTROL 
LISTING 
OLD LIBRARY FILL 

COMPILE OUT FILL 
NEW LIBRARY FILL 
JCL CON OUT FILL 
INCLUDE LUN OPT 
INCLUDE LUN OPT 



ERROR MESSAGE 
PRIMARY INPUT 
SOURCE LISTING 

HATA DIV INT CODE 

PROC DIV INT CODE 



ERROR MESSAGE 

PRINTOUT 

DATA DIV INT CODE 

PROC DIV INT CODE 



rel rec scratch 

ilt output 

rel rec scratch 

machine descript 



SYSTEM MESSAGE 
CONTROL/MESSAGE 
ASSEMBLY INPUT 
ASSEMBLY LISTING 
OBJECT OUTPUT 



ASSEMBLY SCRATCH 



CONTROL 
OBJECT INPUT 
UPDATE LISTING 

UPDATE FILE 
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,# CREATE YANK .COMMENT, "FETCH JCL SEQUENCE " 

/REPLACE YANK . FETCH JCL SEQUENCE . 

/EXEC OBJ»U»SYSTEM,SMR) MEM« (300, 1 1500,5000) PRTY»U.15)I 

/ TIME«-1 MEMI«MEM PRTY»«PRl TIME:»TIM 

/ASSIGN DUMMY , "MR/USER M SG 

/ASSIGN 4 SC DEVICEl-DCON , CONTROL 

/ ASSIGN 6 DUMMY DEVICEI«DLST ,• LISTING 

/ASSIGN ,15 DISCI FILE«(SYSTEM, JCLSRC) BUFFERS-1 . OLD LIBRARY FILL 

/ASSIGN *22 DISCI FILE«(TEMP,COMpl L ) N E W BUFFERS-1 LlNKSEQj , 

/ ACCESS«(ANY.ANY,ANY,ANY) ALL0CATE»(1 ,0,256,3) . COMPILE OUT FILL 

/ASSIGN >25 DUMMY • NEW LIBRARY FILL 

/ASSIGN *26 DISCI FILE* (SYSTEM, JcLCUP) REPLACE BUFFERS*!! 

/ LINKSEQ ACCESS«(ANY,ANY,ANY,ANY)I 

/ ALLOCATE-U, 0,64,1) . JCL UPDAT CON OUT 

/EXEC 0BJ«(1, SYSTEM, BLDEDT) MEM«(300, 550, 2000) PRTY»(1,15)J 

/ TIME — I MEM1«MEM PRTYI«PRl TIME»«TIM 

/ASSIGN 10 DISCI FILE«(TEMP,COMpi L ) BuFFERS«l . SOURCE INPUT 

/ASSIGN 20 DISCI FILE«(SYSTEM,JCW0RK) REPLACE BUFFERS«2| 

/ INDEXED ACCESS«(ANY,ANY,ANY,ANY)> 

/ ALLOCATE«(t,0,256,3) KEYLEN«2 . SOURCE OUT FILE 

/END 
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APPENDIX C 
ADDING TO ITS 



C.l ITS INTERNAL STRUCTURE 

NOTE 

The ITS design includes the ability to support a 
polled terminal for future expansion. This fea- 
ture does not apply to the hardware currently 
supported with DX980. 

Before modifying ITS or adding application programs to run under ITS, the 
programmer must understand the structure of the subsystem. The subsys- 
tem consists of four main parts: Terminal Process Monitor, Terminal I/O 
subroutines, Supervisor, and individual application programs, Figure C-l 
illustrates the interrelation of these components. The following paragraphs 
explain the operation of each component. 
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C. 1 . 1 TERMINAL PROCESS MONITOR 

The' Terminal Process Monitor (ITTPMN) is the main task for ITS and coor- 
dinates ^operation of the other tasks in the subsystem. Figure C-2 pro- 
ves a conceptual flow chart for ITTPMN. The monitor calls two subrou- 
tines, scans the PRCESS flag for each of the terminals connected to lt and 
activates the I/O subroutines. 

^ , i i TTTNTT When ITS is first activated, the monitor calls the ITINIT 
^ Routine." S subline examines the Logical Device ^les ( L DT, for 
the iob to determine what terminals are under control of ITS, and the DX9HU 
Physical Device Table (PDT) for the assigned devices £ d »*™~ *° func . 
characteristics of each terminal. (ITS uses a special SVC so hat *ese£nc 
tions can be performed while executing in the protected mode. ) From this 
formation the subroutine builds a terminal list in the ITS workspace area 
fra^h terminal assigned to ITS. The list contains f^f™*^* 
the terminals. Table C-l defines the information contained in a list entry 
for one of the terminals. 

In addition to building a terminal list, ITINIT allocates one I/O buffer for 
.alfui duplex terminal and a specified number of I/O buffers to "upport 
POlleatrmfnai; Each full duplex I/O buffer is permanently assigned to the 
full duplex terminal. The polled terminal I/O buffers are «^^ U J r £ eB 
signed ITINIT also allocates one Physical Record Block (PRB) I and creates 
one I/O task for each I/O buffer. The I/O tasks for full duplex buffers use 
one I/O task tor eacn _. I/Q t ks for poUe d buffers use the 

the reentrant procedure, ITFDIO. lne l/u tasKs, i t> . , , nnTT!M , fla „ 
, „ = TTPRTO ITINIT sets the Read Terminal (RD1RM) nag 
reentrant procedure, UFBiU. iiiinij. »<=i. When 

t, „f fho terminals and starts them in their respective I/O task, wnen 
for each of the terminals auu =«. ttttomN The I/O tasks 

all I/O tasks are created, ITINIT returns control to ITTPMN. The I/U tasKS 

are described later in this section. 

C 1 1 2 TERMINAL LIST SCAN. When ITINIT returns to ITTPMN the 

„'■; starts scanning each entry in the Terminal List to determine if any 
PRCESS s a S r C e r t . § The PRCESS flag indicates that the terminal operator 

has enteredl complete record that is ready for P""""* by ^J^ 
ITTPMN encounters a terminal entry with a set PRCESS flag it call. .the 
t. ■ /, T <;!!PV1 to service the request from the terminal. If ITTPMJN 

UP ^he°Uttre feJ^nll Ub without binding a set PRCESS flag, it suspends 
"self for on -haH second. At the end of the delay period, ITTPMN reacti- 
vate" Ind begins the table scan again. Each scan cycle ^J^^^ 
l ■ •<* fL first entrv in the list and continues sequentially through tne 

^Tuntil it e ch" thf lid or detects a PRCESS flag. When -turning to the 
T C L cycle after servicing a , PRCESS ^g *, , scan ^tarts - - = ^ _ 

^^cont de^l^of Vcy^ If it his serviced a terminal during that 
cycle. 
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Table C-1. ITS Terminal List Entry- 



Word 



Bit 



Field Name 



Definition 



4-7 



8-15 
0-15 



0-15 
0-15 



0-15 



RDTRM 



TYPTRM 



PRCESS 



WRTTRM 



BFNUM 



LUN 
TRMTSK 



UCBPTR 
PRBPTR 



TRBFLN 



Read Terminal Flag: Setting this flag in- 
structs the I/O task for the terminal to 
issue a Read Terminal I/O call. 

Terminal Type: If this bit is a 0, the cor- 
responding terminal is a full duplex termi- 
nal; if this bit is a 1, the terminal is a 
polled terminal. 

Process Flag: The terminal I/O task sets 
this flag to indicate to ITTPMN that data 
from the corresponding terminal is ready 
for processing. 

Write Terminal Flag: Setting this flag in- 
structs the I/O task for the terminal to 
issue a Write Terminal I/O call. 

Buffer Number: This number indicates 
which of the polling buffers has been dy- 
namically assigned to this terminal. This 
field is not used for full duplex terminals. 

Logical Unit Number: Indicates which 
LUN that the terminal responds to. 

Terminal Task: Task identification of the 
last I/O task that serviced this terminal. . 
This field is static for a full duplex termi- 
nal and dynamic for a polled mode terminal. 

User Control Block Pointer: The location 
of the user control block for the terminal. 

Physical Record Block Pointer: The loca- 
tion of the PRB for the terminal. This 
field is static for a full duplex terminal and 
dynamic for a polled mode terminal. 

Terminal Buffer Length: The number of 
characters that can be put into the buffer 
for the terminal. 
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C. 1 . 1 . 3 ITSUPV. ITTPMN calls the ITSUPV to service a terminal whose 
PRCESS flag is set. ITSUPV is a major part of ITS and is discussed in de- 
tail later in this section. During processing, ITSUPV resets the PRCESS 
flag so that it will not be recognized again during the next table scan. How- 
ever, application programs called by ITSUPV may set the PRCESS flag again 
if they do not complete processing. If ITSUPV requires additional input from 
the terminal, it sets the RDTRM flag before returning to ITTPMN; if data out- 
put to the terminal is required, ITSUPV sets the WRTTRM flag before re- 



C.l.1.4 TERMINAL I/O. If either the RDTRM or the WRTTRM flag is set 
when ITSUPV returns to ITTPMN, the monitor issues a POST to activate an 
I/O task. If the terminal operates in full duplex mode, the monitor activates 
a task using the ITFDIO procedure; if the terminal is a polled terminal, the 
monitor activates a task using the ITPBIO procedure. Either of these tasks 
(initially created by ITINIT) transfers data to and from the terminal device 
by issuing I/O supervisor calls. 

C.1.2 FULL DUPLEX I/O TASK (ITFDIO) 

When building the Terminal List, ITINIT determines if a terminal is operat- 
ing in full duplex mode. For full duplex terminals, ITINIT allocates memory 
to supply a terminal buffer (including one extra word for format control) and 
a Physical Record Block (PRB) for that terminal. It also creates a task with 
pointers to the PRB and the Terminal List as arguments and places the task 
identification in word 1 of the Terminal List entry for that terminal. The 
task, the terminal buffer and the PRB remain associated with the terminal. 
ITFDIO uses information in the terminal list to direct I/O operations between 
the ITS and the full duplex terminal. Figure C-3 illustrates the functions 
performed by the subroutine. 

C. 1.2.1 TASK INITIATION. Before ITINIT creates a terminal task for 
ITFDIO, it sets the RDTRM flag in the Terminal List entry for that terminal. 
Therefore, when ITFDIO begins execution, it issues an I/O SVC to read data 
from the terminal. ITINIT starts tasks for each terminal in the system in 
the same manner, so that when ITINIT returns control to ITTPMN, all ter- 
minal tasks are waiting for input from the corresponding terminals. 

C. 1.2.2 PROCESS REQUEST. When the operator enters a complete rec- 
ord of data at the terminal, the data terminal Device Service Routine (DSR) 
returns control to ITFDIO. ITFDIO then resets the RDTRM flag to indicate 
the completion of a read operation, and sets the PRCESS flag to indicate that 
the data is in the input buffer and requires attention from ITSUPV. ITFDIO 
then suspends processing to wait for either the RDTRM or the WRTTRM flag 
to set. 
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Figure C-3. ITFDIO Conceptual Flow Chart 
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C. 1.2.3 RESPONSE TO TERMINAL. If ITSUPV, or a subordinate applica- 
tion subroutine, produces data in response to a terminal request, it also sets 
the WRTTRM flag after filling the terminal buffer with data to be written to 
the terminal. This flag causes ITTPMN to post the ITFDIO task for that ter- 
minal and instructs that task to issue a Write Terminal I/O SVC. If more 
data is required, RDTRM is set. If both WRTTRM and RDTRM are set, the 
I/O is performed in the order of write and then read. Neither ITSUPV or the 
subordinate applications issue I/O SVCs to communicate directly with the ter- 
minals. 

C. 1.2.4 DISPLAY SIZE. During construction of the Terminal List, ITINIT 
determines the display size of the terminal from the PDT. The display size, 
plus the format control word, determines the allocated buffer size for the 
terminal, and also specifies the length field in the PRB when the terminal is 
opened. Buffer lengths for the terminal devices are as follows: 

• Teleprinter - 82 characters 
9 Teletype - 74 characters 

• CRT - variable up to 1922 characters 

If available memory cannot support several terminals with a 1922 character 
display, the PDT can be modified to reduce the display size. The display 
size for CRTs can be reduced to 80 characters so that the CRT responds as 
a teleprinter. 

C.1.3 POLLED TERMINAL I/O TASK (ITPBIO) 

The polled I/O routine (ITPBIO) is a reentrant subroutine that, unlike 
ITFDIO, does not require a task for each terminal. Instead, ITINIT creates 
a task for each polling buffer. The number of polling buffers can be signifi- 
cantly less than the number of terminals. Figure C-4 illustrates the func- 
tions performed by the subroutine. 

C. 1 . 3. 1 TASK INITIATION. When ITINIT determines that there is one or 
more polled terminals assigned to ITS, memory is allocated for a specified 
number of polling buffers and PRBs. The number of polling buffers specified 
for the standard ITS is two. Although this number can be increased, two 
should be adequate for most applications. Unlike full duplex terminals, a 
task is not created for ITPBIO when a polled terminal is added to the terminal 
list. However, like full duplex terminals the RDTRM flag is set. After all 
terminals have been added to the terminal list, ITINIT allocates memory for 
a buffer and PRB, and creates a task for each polling buffer. The first time 
through, ITPBIO does not issue a terminal read since ITINIT does not specify 
which terminals should be polled. Thus control goes immediately to an SVC 
to suspend ITPBIO until posted by ITTPMN. 
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C. 1. 3.2 PROCESS REQUEST. ITTPMN checks the status of the polling 
buffers and the polling lines (communication modules) if: 

1) a terminal is ready for processing and ITTPMN calls ITSUPV, or 

2) no terminal is ready for processing and ITTPMN suspends itself 
for one-half second. 

If both a polling buffer and a line are free, ITTPMN issues a post for the ap- 
propriate ITPBIO together with a pointer to the line to be polled. 

After receiving control, ITPBIO issues a read to each terminal on the polling 
line in succession. If a terminal user has pressed the transmit key prior to 
issuance of the read to his terminal, the screen data is transferred when the 
read is issued. If the transmit key has not been pressed, the terminal does 
not respond and the DSR returns control to ITPBIO with a record length of 
zero. This record length is treated as a negative response and a read is 
issued to the next terminal on the line. The first positive response termin- 
ates the poll and the PRCESS flag is set for the corresponding terminal. 
ITPBIO then issues a suspend SVC to wait for another post. 

C. 1. 3. 3 RESPONSE TO TERMINAL. The WRTTRM flag can be set by 
ITSUPV or a subordinate application subroutine. This causes a post to the 
appropriate ITPBIO task for data transfer. After the data is transferred, 

TTTlDTn J~J- ; -, „."U~.»-T ~. DRTDA^ .'^ «1^ 4- Tf DnTDAf :^ „„i TTT}-DTr^ 

iiruiv uciciiiiiiicD wucuici ivi/ i ivivi ±o aiau dcl. j.± ivi/ x ivivi is acu, uriJiu 

releases the buffer and issues a suspend SVC. If RDTRM is not set, ITPBIO 
sets PRCESS and does not release the buffer. This process allows a pro- 
gram to maintain a buffer throughout a series of data transfers to a terminal. 

C. 1 . 3. 4 DISPLAY SIZE. When ITINIT determines that polling buffers are 
required, it also determines the largest display size for the terminals to be 
polled. It then allocates memory to each buffer that corresponds to the maxi- 
mum size. 

C . 1 . 4 SUPERVISOR (ITSUPV) 

The ITS Supervisor (ITSUPV) is a combination state and table driven control- 
ler that acts as an intermediary between ITTPMN and the application pro- 
grams that run under ITS. When ITINIT initializes a terminal, it creates a 
table of parameters, called the User Control Block (UCB), that stays with the 
terminal as long as it is assigned to ITS. The information within the UCB 
varies with the user program that is currently using the terminal. Table C-2 
defines the information fields within the UCB. When control transfers to 
ITSUPV to service a particular terminal, it clears the Terminal List flags 
for that terminal and examines the state-field of the UCB to determine what 
type of servicing is required. Figure C-5 illustrates the logical sequence of 
events within ITSUPV. Table C-3 defines the terminal states and the actions 
required of ITSUPV to service a terminal in that state. 
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Table C-2. ITS Terminal User Control Block (UCB) 



Word 



0-2 



3-4 



Field Name 



8-9 



10-11 



12 



13 



14-49 



USERID 



ACCTNO 



STATE 



TRMPTR 



OPTR 



TIMEON 



DATEON 



TRMLNS 



LINLEN 



Description 



User Identification: This field contains the 
<userid> that is entered at the terminal during a 
Logon operation. Not validated by current 
ITSUPV. Reserved for future accounting software, 

Account Number: This field contains the <acctno> 
that is entered at the terminal during a Logon op- 
eration. Not validated by current ITSUPV. Re- 
served for future accounting software. 

Terminal State: This field contains a number that 
indicates to ITSUPV how to respond to a service 
request from the terminal. 

Terminal Pointer: This field contains the mem- 
ory address of a table of device characteristics 
for the terminal. 

Operation Pointer: This field contains space for 
the application program to load a pointer for its 
use. 

Clock Time of Logon: This field is not used by 
the standard ITS. 

Calendar Date of Logon: This field is not used by 
the standard ITS. 

Terminal Lines: This field specifies the number 
of lines on the display unit. 

Line Length: This field specifies the length of 
each display line. 

These fields provide intermediate storage of 
parameters for the application program currently 
using the terminal. 
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Table C-3. User Control Block State Definitions 



State Number 



10-19 



20-29 



30-39 



>40 



Terminal Conditions /Requirements 



Inactive: User has not entered a Logon command to 
identify himself. ITSUPV checks only for a Logon 
command. 

Ready: User has logged-on, but has not as yet re- 
quested any application program. 

Edit: User is currently running the Interactive File 
Editor (ITIFE) application program. ITSUPV calls 
ITIFE to process request. 

Remote Job Entry: User is currently running the Re- 
mote Job Entry (ITRJE) application program. ITSUPV 
calls ITRJE to process request. 

Status: User is currently running the Status Display 
(ITSTAT) application program. ITSUPV calls ITSTAT 
to process request. 

User Program: User is currently running an applica- 
tion program not normally supplied with ITS. ITSUPV 
transfers control to the user program if the program 
has been entered in the table of recognizable code for 
ITSUPV. 



C . 1 . 4. 1 STATE 0. If the UCB State field is zero, the user has not pre- 
viously entered data from the terminal. Therefore, the first command from 
the terminal must be a Logon command to identify the user. In State 
ITSUPV calls the command scanner to examine the input code. If the input 
code does not contain a Logon command, ITSUPV returns control to. ITTPMN 
without further processing. If the code contains a Logon command, ITSUPV 
validates the syntax, transfers the pertinent data to the UCB and places a 
Ready indication in the I/O buffer. It then sets the WRTTRM flag .to ensure 
that the Ready indication is sent to the terminal and sets the RDTRM flag to 
enable the user to respond by entering the next command. ITSUPV then 
places a value of 1 in the State field of the UCB before returning control to 
ITTPMN. 

C. 1.4.2 STATE 1. If the UCB State field is one, the user has logged-on, 
but has not as yet indicated an application program. ITSUPV then calls the 
command scanner to examine the input code (see Section V for a de- 
scription of the command scanner). The input command must be one of the 
commands that ITSUPV can recognize. The standard ITS system provides a 
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table of commands that allows ITSUPV to recognize the following input com- 
mands and their appropriate arguments: 

EDIT 

ENTER 

LOGOFF 

JOB 



STATUS 

DELETE 

Any user programs that are added to ITS must also add at least one command 
to this list that will link ITSUPV to the user program. ITSUPV processes the 
Logoff command. Application programs process all other commands. If an 
application program processes the command, ITSUPV transfers control to 
that program with a Branch and Link (BRL) instruction. Pointers to the ter- 
minal list entry and to the command scanner data arrays accompany the com- 
mand to the application program. The application program, therefore, has 
access to all control blocks for the terminal, plus the command and argu- 
ments that were entered at the terminal. 

C. 1 . 4. 3 OTHER STATES. If the UCB State field is greater than one, 
ITSUPV transfers control directly to the application program. Terminals in 
this state have previously used an application program. That program set 
the state field to a value that returns control to the program for further in- 
put, or that logs -off the user from that program. ITSUPV does not process 
commands in these higher states. Therefore, the application program must 
uecouc any commanus xrom tue terminal. 

C . 1 . 5 APPLICATION PROGRAMS 

Application programs that run under ITS are closed subroutines. The argu- 
ments that ITSUPV passes to the program are pointers to the appropriate 
terminal list entry and the command scanner arrays. Figure C-6 shows the 
relationship between the control blocks and structures. 

C. 1 . 5. 1 CONTROL TRANSITIONS. When control is passed to an applica- 
tion program, the RDTRM, WRTTRM, and PRCESS flags are all set to zero 
and the buffer pointer in the PRB points to the first data word in the terminal 
buffer. If this is the initial entry into the subroutine, STATE is set to 1 and 
the key and packed arrays in the command scanner structure contain the de- 
coded command line. Before the application program returns control to 
ITSUPV, the program sets RDTRM, WRTTRM, PRCESS, STATE, and the 
format control word according to the requirements of the application. 
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TERM 1NAL 
LIST 



USER CONTROL 
BLOCK 




TERMINAL 
CHARACTERISTICS 



1-3 



PHYSICAL RECORD 
BLOCK 



TERM INAL 
BUFFER 



NOTE; NUMBERS IN THE BLOCKS CORRESPOND 
TO WORD NUMBER 




(A)l 301 1 7 

Figure C-6. ITS Control Blocks 

C. 1 . 5. 2 SAMPLE APPLICATION TRANSFER. The following example 
from the file editor illustrates the strategy for performing a function under 
ITS. The terminal is in the Ready state, and the user wants to edit a file by 
changing the string ABC to XYZ everywhere that it appears. The file con- 
tains 50 records. The following sequence performs that operation: 

1. User keys EDIT FILE = (1 , USER01 , MYFILE) and presses RETURN 
from a teleprinter; ITFDIO then sets the PRCESS flag. 

2. ITTPMN detects that processing was requested and calls ITSUPV. 
ITSUPV calls the command scanner, determines that the command 
is to be processed by the file editor (ITIFE) and makes the call. 
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3. ITIFE calls a subroutine to assign and open the file, and read the 
first file record into the terminal buffer. ITIFE then sets the for- 
mat control word to 000E l6 , RDTRM to 1, WRTTRM to 1, and 
STATE to 11, and returns control to ITSUPV. ITSUPV returns to 
ITTPMN to activate the I/O task for the user's terminal. 

4. ITFDIO writes the terminal buffer and issues a read to accept more 
input. 

5. Terminal user enters RA 1. 50 /ABC/ /XYZ/ to direct the file editor 
to replace all strings ABC with the string XYZ in the next 50 rec- 
ords of the file. 

6. ITTPMN detects that processing was requested and calls ITSUPV. 
ITSUPV determines that STATE is between 10 and 19 and calls 
ITIFE. ITIFE calls the command scanner, determines that the com- 
mand is a string operation, and calls a subroutine that processes all 
string commands. The string processor reads 25 records, changing 
ABC to XYZ wherever found. After processing the 25 records, 

(the subroutine interrupts itself rather than being arbitrarily cutoff) 
the string processor changes STATE to 14, leaves RDTRM and 
WRTTRM reset, sets the PRCESS flag and returns control through 
ITIFE and ITSUPV to ITTPMN. ITTPMN does not post the I/O rou- 
tine because neither RDTRM or WRTTRM are set. However, it 

J^^^, ^^v,*-^^,-,^ 4-*U ~* i- ~ -u. ,~, ^ * ~ 1 ^. ^ „ i- X."U ~ .^„„.L. „^4-^.._ 

UUC O V-l^XlLAi.lU4.C UX1C UClllliliai S^ail CO, I.JLJ.O HCAl CLIUXV. 

7. In time the terminal scan progresses to the same terminal. ITTPMN 
detects that processing was requested and passes control through to 
the string processor to process the last 25 records. After process- 
ing is complete, the string processor puts the last record processed 
in the terminal buffer, sets RDTRM and WRTTRM to 1, changes 

CTATTT U->«V ^ 11 -,~A •*. ~x„ -v.~ ~ T r ^T^7 , T^ , ^^4--, 4-"U ~ £~~^~~*- ~~~4-,«~1 „ — ~J 

<>~> J. -i"». J. J^-l UO-V^XS. H-» X X O.J.J.VJ. i-ClUlllO. J.J. IX' XU OC L.O IJ.1C ±KJ x ma c tuiaiui WUiU 

to OOOE^ and returns through ITSUPV to ITTPMN to activate the 
appropriate I/O task. Control then returns to the user. The user 
can key in either more edit commands for further file processing, a 
Stop command to get back to the ready state, or a Logoff command 
to exit the system. 

C.2 DESIGN PRINCIPLES 

Before adding a new application program to ITS, the user must understand 
the design features in the subsystem that provide the highest overall effi- 
ciency for the subsystem. Observance of these principles when implement- 
ing a new program will enhance its performance within the system, 

C . 2 . 1 DUAL MODE OPERATION 

ITS can run in either the protected or the privileged mode. The first DXOLE 
control card (see Section VIII) controls the mode of operation. If the card 
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specifies SUBSYSTEM, the program links for privileged operation; if the 
card specifies NORMAL, the program links for protected operation. Privi- 
leged mode is slightly faster than protected mode since it performs less er- 
ror checking for privileged SVCs. In addition, a privileged mode program 
can be smaller since it can access the runtime package that is linked into the 
memory resident portion of the operating system. 

Protected mode simplifies debugging a new ITS application program, and 
guarantees that an error in the new program will not destroy the operating 
system. When preparing the new program, link it in the protected mode. 
Then check the program by running a single terminal with the PROT param- 
eter specified in the Execute command (EXEC) to the JCL translatore. When 
the application is completely checked in this manner, it can be linked with the 
rest of ITS with SUBSYSTEM specified on the DXOLE control card. 

C . 2 . 2 APPLICATIONS OVERLAY 

To attain maximum memory efficiency, ITS application programs can be 
overlayed. The majority of ITS is coded as reusable subroutines. This con- 
vention allows the overlays to be the simple, preplanned overlays supported 
by DXOLE. 

C. 2. 3 PSEUDO TIME SLICING 

To avoid monopolizing the system for a single terminal application, all ap- 
plication programs must return control to ITTPMN periodically. To main- 
tain an average access time of three seconds for any terminal and for a total 
of up to 30 terminals, the average processing time for any one terminal re- 
quest must be limited to 100 milliseconds. Many terminal requests require 
less than the 100 millisecond average; long functions may use up to a maxi- 
mum of 200 milliseconds. The actual interruption of the program, however, 
is left to the program itself. That is, either the program completes its pro- 
cess within the time limit, or the program interrupts its processing at a 
logical breakpoint to return to ITTPMN within the time limit. If the program 
interrupts itself, it returns to ITTPMN with the PRCESS flag set, and with 
both RDTRM and WRTTRM flags clear. Thus, no I/O operations are initiated 
and ITTPMN returns to the program during the next Terminal List scan. 
This process of allowing the program to limit its time instead of being trun- 
cated after an arbitrary period is called pseudo time slicing. 

Two functions in the standard ITS package, the RJE processor and the Display 
Status processor, do not follow the pseudo time slicing guidelines. These 
processors both contain supervisor calls that take longer than 200 millisec- 
onds to perform (Start Job and Stat SVCs, respectively). Control does not 
return to the processor until the SVC is complete. For each of these proces- 
sors a small reentrant module appears in the root segment of the ITS overlay. 
After the Job, Run and Stat commands are syntactically validated, the pro- 
cessor creates a task that points to the reentrant module. The reentrant 
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module issues the SVC. The processor then resets PRCESS, RDTRM and 
WRTTRM flags and returns normally to ITTPMN. When the SVC returns, 
the reentrant module sets the PRCESS flag and issues a Delete Task SVC.' 
During the next Terminal List scan cycle, ITTPMN detects the PRCESS flag 
and reactivates the processor. 

C. 3 MODIFYING ITS 

Calls from ITS to applications programs are driven by a set of tables in the 
module, ITSTBL. To add an application, the ITSTBL source module must 
be modified, assembled, and linked with ITS and with any new applications 
programs. Refer to figure C-7 for a listing of the components in the ITSTBL 
module. Two sets of tables must be modified to add an application: The 
State /Call Translation Tables and the Application Names /Initial Entry Tables. 

C. 3. 1 STATE/CALL TRANSLATION TABLES 

The State/Call Translation Table, STATET, breaks all of the possible states 
into State Intervals. Once the interval is determined by ITSUPV, it is used 
as an index for an indirect branch through a table of application entry addres- 
ses (SCALLT). Note that on the standard table states through 1 map into a 
call to ITCOM (ITS command decode), states 2 through 19 map to ITIFE (al- 
though only states 10 through 19 are used), states 20 through 29 map to 

^ ^, _~~ „v^ ^^ "n^ugii _» 7 iii<xp w x j. o j. -t-j. j. . j. o aaa an application tnat 

uses states 40 through 49, a "DATA 49' statement must be inserted after the 
'DATA 39' statement in STATET, and a 'DATA application entry point' must 
be inserted after the 'DATA ITSTAT' statement in SCALLT. This will cause 
ITSUPV to call the given application for states 40 through 49. Note that a 
single application may have more than one state interval and entry address 
if desired. 

C.3.2 APPLICATION NAMES/INITIAL ENTRY TABLES 

This set of tables map application names to initial application entry points. 
The first table, RESLAB, is a list of eight character application keywords. 
The second table, ICALLT, is a list of application entry points that corre- 
spond to the application names. New application names must be inserted 
after the DATA 'JOB', 'DELETE' statement in RESLAB, and new initial entry 
points must be inserted after the last 'DATA ITIFE' statement in ICALLT. 
The order of the standard eight commands may not be changed. 
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IDT ITSTBL 
*********************************************************************** 

ABSTRACT • THIS TABLE CONTAINS THE USER VARIABLE PARAMETERS 
FOR THE INTERACTIVE TERMINAL SYSTEM, AND DEFINES 
THE APPLICATION NAMF8 AND ENTRY ADDRESSES. THIS 
MODULE MUST HE MODIFIED IN ORDER TO ADD ANY 
ADDITIONAL APPLICATIONS ROI'TINES. 



ROUTINES 

CALLED ■ LOGON, LOGOFF, ITRJE, TTSTAT, ITIFE,ITCQM 



*************** 




HED 


ITS 


*************** 


* 


NOTE 


t 


* 


THIS 


*************** 




DEF 


INF 




REF 


LOG 


A 


EQU 


a 


E 


EQU 


1 


X 


EQU 


2 


M 


EQU 


3 


S 


EQU 


4 


L 


EQU 


5 


B 


EQU 


6 


P 


EQU 


7 


BR 


EQU 


1 


BX 


EQU 
PEJ 


3 


* 






* 


APPL 


ICAT 



******************************************************** 

COMMAND/STATE TABLF 
********************************************* 

* 
MODULE MUST HE UCL"DED IN THE ROOT SEGMENT * 
********************************************* 
0,RESLAB,KEYA,PAKST*,ICALL,SCALL,33ATET,P0LTIM 
ON,LOGOFF,ITRJE,ITSTAT.ITIFE,BADST,ITCOH 



APPLICATION NAMES CRESLAB) 



RESL.AB EQU S 



* 

RESD 

NPES 

* 

* 

* 

ICALLT 



', 'LOGOFF ' ** POSITION SENSITIVE ** 
** POSITION SENSITIVE ** 
** POSITION SENSITIVE ** 
** POSITION SENSITIVE ** 

INSERT NEW APPLICATIONS ABOVE 
S.RESLAB THIS LABEL MUST FOLLOW LAST 
RESD/4 APPLICATION NAME 



DATA 'LOGON 

DATA 'RUN 

DATA 'EDIT 

DATA 'JOB 



EQU 
EQU 



', 'STATUS 
', 'ENTER 
', 'DELETE 



INITIAL ENTRY ADDRESS TABLE 



EQU 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

PEJ 



S 

LOGON 

LOGOFF 

ITRJE 

ITSTAT 

IT1FE 

IT1FE 

ITRJE 

ITIFE 



Figure C-7. ITSTBL Listing (Sheet 1 of 2) 
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STATE/CALL TRANSLATION TABLFS 



8TATET EQU $ 

DATA 1 

DATA J9 

DATA 29 

DATA 39 

* 

DATA -1 



STATES 00-01 

02-19 

20-29 

30-39 
INSERT NEW STATES HERE 

ALL OTHERS 



SCALLT 


• h AT A 


TtrnM 






DATA 


ITTFE 


10-19 IFE 




DATA 


ITRJE 


20-29 RJE 




DATA 


ITSTAT 


30-39 STATUS 


* 






INSERT NE'-» CALLS HERE 




DATA 


SADST 


ALL UNDEFINED STATES 


* 


PEJ 






* 


ROUTINE TO MAKE 


INITIAL CALL BY APPL. NAME 


iwnUU 


EQU 


S 






RMO 


B,A 


SAVE BASE 




RMC 


H,B 


GET SECOND ARGUMENT 




LDX 


*2,BR 


* 




RMO 


A,B 


RESTORF BASE 




LDA 


ICALLT,X 


GET CALL ADDRESS 


4 


RMO 


A,P 


CALL 


* 


ROUTINE TO MAKE 


SUBSEQUENT CALLS ACCCRDIMfi TO STATE 


SCALL 


EQU 


c 






RMO 


B,A 


SAVE BASE 




RMO 


M,B 


GET SECOND ARG. 




LDX 


*2,BR 


* 




RMO 


A,B 


RESTORF BA8E 




LDA 


SCALLT, X 


GET CALL ADDRESS 




RMO 


A,P 


CALL 


* 


PEJ 






* 


CRSCAN 'CONTROL' 


ARRAY 


INFO 


EQU 


1 






DATA 


NPAK 


NUMBER OF CHARS, IN 'PAKSTR' 




DATA 


NKEY 


NUMBER OF WORDS IN »KEYA' 




DATA 


0,0 


CRSCAN WORKSPACE 




DATA 


NRE8 


NUMBER OF LABELS IN 'RESLAB' 




DATA 





START^G SCAN POSITION 


NPAK 


EQU 


60 


NO OF CHAR, IN PAKSTR 


NKEY 


EQU 


90 


NO OF W0Rf>3 IN KEY ARRAY 


KEVA 


B33 


NKEY 




PAKSTR 


B3S 


NPAK/2 






DEF 


TRMS, BUF3, LINS 


MTRMS 


EQU 


32 


MAX. NO, OF TERMINALS 


MLINES 


EQU 





MAX. NO, HF POLLING LINES 


M6UF3 


EQU 





MAX, NO, flF POLLING BUFFERS 


TRMS 


B3S 


6*MTRM3 


TERMINAL LIST 


8UF8 


B3S 


4*MBUF8 


BUFFER LIST 


LINS 


B3S 


36*MLINE8 


LINE LIST 


POLTlM 


DATA 


500 


POLLING INTERVAL (IN MILLISECONDS J 




DEF 


UCBSIZ 




UCBSIZ 


DATA 
END 


B0 


USER CONTROL BLOCK SIZE 



Figure C-7. ITSTBL Listing (Sheet 2 of 2) 
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C. 3. 3 CALLING CONVENTIONS 

Calls from ITSUPV follow the standard DX980 calling conventions and are 

as follows: 

• Initial Entry (via Applications Names /Initial Entry tables) 

@LDM=ARGLST 
@ BRL APPLIC 



ARGLST DATA 2 

DATA TRMLST pointer to TRMLST entry 

DATA keyno pointer to Key Number index 

Subsequent Entry (via State/Call Translation Tables) 

@LDM=ARGLST 
@BRL APPLIC 



ARGLST DATA 2 

DATA TRMLST 

DATA STATI pointer to state interval 

C.3.4 CRSCAN ARGUMENTS 

The calling argument, key array, and packed string for the command decode 
done in states and 1 are in ITSTBL. 

C. 3. 5 TRMS 

All TRMLST entries are built in ITSTBL in the buffer 'TRMS'. The size of 
this area is controlled by the label, MTRMS. 

C.3.6 POLLING PARAMETERS 

Several parameters may be adjusted to suit the requirements of the user. 
These parameters are: 

• POLTIM - Time interval for polling 

• MLINS - Maximum number of polling lines 

• MBUFS - Maximum number of polling buffers 

C. 3. 7 USER CONTROL BLOCK SIZE 

The user may alter the size of the USER CONTROL BLOCKS by adjusting the 
value of the statement: 

UCBSIZ DATA 50 
Note that the minimum UCB size for IFE is 50 words. 



c _ 2 o Digital Systems Division 




943005-9701 



APPENDIX D 
ADDING NON-STANDARD DEVICES TO DX980 



Digital Systems Division 




943005-9701 



APPENDIX D 
ADDING NON-STANDARD DEVICES TO DX980 



D. 1 GENERAL 



By using DX980 utilities, user supplied routines, and information about the 
I/O package, up to four non-standard devices may be added to a DX980 con- 
iiguration. nowevcr iiun- s Ldnuctru u,i»u» tamiut uc auucut x ^ o\j.\j\j<jl<~ o- 
new device, the user must design, code and install a device service routine in 
the system. In addition, he must implement a utility to build and modify I/O 
associated tables. This appendix provides the necessary information and 
procedure to accomplish these tasks. 

D.2 WRITING A DEVICE SERVICE ROUTINE 

Writing a new Device Service Routine (DSR) requires a knowledge of the 
DX980 input /output structure, coding requirements for a DSR, plus an under- 
standing of the device characteristics to be allowed for in the routine. The 
following paragraphs provide that background in addition to sample DSR's to 
be used as a guide. 

D.2.1 INPUT/OUTPUT STRUCTURE 

A program initiates Input/Output operations by using an I/O supervisor call 
(SVC) and passing the required operation via a Physical Record Block (PRB). 
The SVC is actually an illegal instruction that generates an internal interrupt. 
The internal interrupt decoder passes control to the SVC Processor. ^ After 
determining that an I/O SVC has been made, the SVC Processor gives con- 
trol to the I/O Manager. Figure D- 1 illustrates the relationship of the I/O 
Manager within the I/O system. 

The I/O Manager performs the required housekeeping of the I/O associated 
tables, controls the available devices, sets up and controls DSR entry and 
exit, and performs all other common I/O SVC functions. The following are 
some of the pre - DSR device independent functions performed by the I/O 
Manager: 

Control and housekeeping of Open/Close calls 

Device assignment checks 

LUN Open checks 

Control of the share/exclusive capabilities 

Data buffer boundary checks 

Linking PRB's and Logical Device Tables (LDT's) to the Physical 
Device Tables (PDT's) 
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I/O MGMT CONTROL PATHS 



END 
TASK 
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ACTIVATE 



CANCEL 



USER 
CODE 







SVC 
PROCESSOR 
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EXECUTE 
PREPROCESSOR 
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Figure D- 1 . General I/O Flow 
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• Queuing operations when a device is busy 

• Monitoring system operations for initiate I/O SVC's 

• Calling the correct DSR 

D.2.2 DEVICE SERVICE ROUTINES (DSR's) 

DSR's provide the actual interface with the hardware. They check for illegal 
operations and for special device dependent and unique conditions not monitor- 
ed by the I/O Manager, The DSR's have three standard entries; an mitiai 
entry, a reset or cancel entry and an interrupt entry. 

D.2.2. 1 INITIAL AND CANCEL ENTRIES. For initial entry, the I/O Man- 
ager issues an SVC to begin an I/O operation. The I/O manager also controls 
the cancel or reset entry by issuing an SVC to the DSR when the system is try- 
ing to terminate an I/O operation in progress. The SVC is as follows: 

CALL SVC (DSR #, PDT @, TYPE) 

In this form, the term PDT @ represents a pointer to the PDT containing the 
I/O information. The term TYPE indicates that the call is either an initial 
or a cancel entry to the DSR. 

Since the I/O Manager calls DSR's with an SVC, the DSR can have only one 
entry point. For this reason and also to perform some common logic rou- 
tines, the DSR executes a system routine (ISDSRI) immediately when entered. 
This call must appear in all DSR' s and has the following format: 

REF ISDSRI 
START EQU $ 

RMO L, A 1st word of code 
@BRL ISDSRI 

DATA interrupt entry pointer 
DATA cancel entry pointer 

(logic for initial entry) 

• 

The initial entry checks operation validity, starts the I/O operation and, if 
possible, completes the operation. The reset path terminates the I/O opera- 
tion by reseting the interrupt logic and, trying to halt the I/O device. 

D.2.2. 2 INTERRUPT ENTRIES. I/O interrupts can occur during or at the 
end of an I/O operation from either an I/O Bus or a Direct Memory Access 
Channel (DMAC) device. I/O bus interrupts can occur following each char- 
acter transfer while DMAC devices usually interrupt when the operation is 
complete. The operations following an interrupt resemble the response to a 
supervisor call. However, the interrupt decoder coordinates the activity 
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instead of the SVC Processor. The interrupt decoder transfers control to 
the DSR through the interrupt entry. The interrupt entry either completes the 
operation or prepares for further interrupts. 

D.2.2.3 REGISTER INITIALIZATION. Regardless of the type of entry, 
when the DSR is entered from the entrance utility, the following registers are 
initialized: 

• Register E = 

• Register S = entry address of the utilities 

• Register M = pointer to the PRB 

• Register B = pointer to the PDT 

In addition, if the entry was an initial entry, registers A and X contain the 
operation code. 

D.2.2.4 EXITS. For any type of entry the DSR may take one of six possible 
exits (see the DSR EXIT utility). These may be classified into three groups. 
The NORM exit is the normal exit from the DSR when no abnormal conditions 
have been detected and the data transfer is not yet complete. The EOR exit 
indicates an End-of-Record exit when the requested data transfer is complete. 
Other types of exits are used to indicate that abnormal conditions were en- 
countered. 

D. 2.2.5 I/O ERRORS. Errors that occur during an I/O operation are 
described in Section III of this manual. The I/O Error numbers listed in 
Section III are in the range of 201 - 209. However, the I/O Manager adds 
200 to the error number returned by the DSR. Therefore, the DSR need 
only provide an error number from 1 - 9 to the I/O Manager. An additional 
error number, 10, is reserved for use by the I/O Manager. When an error 
occurs that requires return to system control, the DSR performs one of the 
standard exit utilities. 

D. 2.2.6 SYSTEM ERRORS. Most I/O errors may require abortion of the 
user job requesting the I/O. Some types of I/O errors, however, are so 
severe that they endanger the integrity of the system. For these errors the 
DSR should halt the system so that the cause of the problem can be determined 
before the clues are destroyed. An available DSR routine, SCRASH, provides 
a standard method of bringing the system to a halt gracefully. This routine 
causes the CPU to IDLE. Information from the routine that called SCRASH 
may then be displayed. A sample calling sequence is shown below: 

REF SCRASH 

@LDM =ERINFO Load M Register with Address of Error Information 
@BRL SCRASH Call SCRASH 

; (Continued on next text page) 
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ERINFO DATA 1, BADERR Number of Arguments, Address of Arguments 
BADERR DATA ERCODE Code that may be displayed in the A Register 

at IDLE. 

If arguments other than an error code would provide helpful information, the 
number of arguments may be increased. At IDLE the M Register provides 
a pointer to this information. See the DX980 System Operation Guide for the 
standard set of SCRASH codes. 
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Operation Ignored bit in the system set flags (PRB word 0, bit 3) when an 
operation is not implemented. The I/O manager sets all other system set 
flags. The DSR may pass device dependent information to the caller through 
the non-dedicated bits of the PRB. When passing information that requires 
several words, the DSR must use a buffer that is pointed to by the third word 
of the PRB. The operation code for this type of call is either 0, 1, 2, 3, 19, or 
20. The DSR does not need to set or reset any indicators for the I/O Manager. 
The type of exit taken indicates a course of action for the I/O Manager. 

D.2.3 I/O UTILITY ROUTINES 

The I/O utility routines perform common DSR functions with minimal coding 
in the DSR itself. By using the utilities, the DSR need never know the mem- 
ory locations of any PDT, PRB or LDT; furthermore it does not need to mon- 
itor character input and output buffer indexes. The DSRs use the exit utilities 
to ensure proper handling of interrupts and other types of exits. Failure to 
use the optional utilities creates increased DSR size, development time, and 
maintenance requirements. The I/O Utility Routines perform services fre- 
quently required by Device Service Routines (DSRs). The functions available 
are: 

PRB /PDT /LDT Bit Manipulation 

PRB/PDT/LDT Word Transfer (via register) 

PRB/PDT/LDT Conditional Skip on Bit 

READ/WRITE on I/O Bus (via register) 

PUT/GET Character from Packed Buffer (via register) 

LINKAGE to DSR Exit Routine 

The routines generate no task or system errors. All I/O interrupts must be 
masked and the B Register must point to the PDT when using the routines. 

D.2. 3. 1 UTILITY ROUTINE INTERFACE. The utility routines are serially 
re-usable. The DSR need not know the location of the utility routines in mem- 
ory. When the DSR is entered by the I/O call processor or Interrupt Decoder, 
the S- register contains the I/O utility entry point. The routines are entered 
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by execution of an REX S, P instruction. To enhance DSR readability, the 
REX S, P instruction is defined as a new instruction, IOCOM, using the OPD 
assembler directive: 

IOCOM OPD C7C7, 5 
A two word calling sequence is required to use a utility function: 

IOCOM 

OPERATION OPR1, OPR2, , OPR(N) 

The I/O Utility ENTRY/EXIT Routine transfers control to the correct opcode 
processor. This processor decodes the operand(s) and performs the function. 
On return to the DSR, execution resumes at the instruction following the oper- 
ation designator (unless a skip was executed. For skip instructions execution 
is resumed two instructions after the operation designator). No active regis- 
ters used by the DSR are changed by the common utility routines unless called 
for in the operation; however, the status register compare indicators are 
volatile. 

All general- purpose DSR' s use the utility functions as much as possible, 
sometimes a special-purpose DSR cannot afford the added overhead of using 
the Common Utility Functions. To allow for in-line coding where necessary, 
the DSR is always entered with the PDT location in the B- register and the 
PRB location in the M- register. Additionally, the E- register is always 
zeroed when a DSR is entered. 

D 2 3 2 SET /CLEAR PRB, PDT, OR LDT BIT. This routine allows the 
DSR to manipulate bits within the PRB, PDT or LDT. The machine instruc- 
tion appears in the following format: 



4 5 6 7 



1112 15 



OP CODE 



LOCA- 
TION 



WORD NUMBER 



BIT NUMBER 



10=SKIP ON ZERO 00=PRB 
11 -SKIP ON ONE OI^PDT 



The assembler directives that define the instruction are as follows: 



BIT 


FRM 


5,2,5,4 


SET 


EQU 


1 


CLR 


EQU 





PRB 


EQU 





PDT 


EQU 


1 



LDT EQU 
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Therefore, the general form of the instruction becomes: 

, <word number>, <bit number> 



m [SET 
BIT CLR 



fPRB 
, LDT 
(PDT. 



For example, the expression: 

IOCOM 

BIT SET,PRB, 1, 5 

changes bit 5 of PRB Word 1 to a value of 1. Also, the expression: 

IOCOM 

BIT CLR, LDT, 0, 15 

changes bit 15 of LDT Word to a value of 0. 

The utility's execution time is between 26. 00 to 29. 50 microseconds. 

D.2.3.3 CONDITIONAL INSTRUCTION SKIP FROM PRB, PDT OR LDT BIT 
This routine allows the DSR to inspect a specific bit of either the PRB, the 
PDT or the LDT and either skip or not skip depending upon the state of that 
bit. The machine instruction word appears as follows: 



4 5 6 7 



11 12 



1 5 



OP CODE 


LOCA- 
TION 


WORD NUMBER 


BIT NUMBER 



1 =SET BIT 
0=CLR BIT 



00=PRB 
1 =PDT 
10=LDT 



The assembler directives that define the instruction are as follows: 

BIT FRM 5,2,5,4 

SKIP0 EQU 2 

SKIP1 EQU 3 

PRB EQU 

PDT EQU 1 

LDT EQU 2 

Therefore, the general form of the instruction is: 



BIT 



fSKIPO] 
ISKIPli ' 



fPRB 

PDT 
LDT 



, <word number>, < bit number> 
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For example, the expression: 

IOCOM 

BIT SKIPO, PRB, 3, 15 

indicates that if bit 15 of PRB word 3 is a zero, then the next instruction 
should be skipped. Similarly, the expression: 

IOCOM 

BIT SKIP1, LDT, 0, 

indicates that if bit of LDT word is a 1, then the next instruction should 
be skipped. 

The execution time for this utility is between 27. 50 to 29.75 microseconds. 

D. 2.3.4 LOAD/STORE PRB, PDT OR LDT WORD TO/FROM REGISTER. 
The routine allows the PRB to transfer a word between a designated register 
and a specified word in either the PRB, PDT or LDT. The machine instruc- 
tion appears in the following format: 



4 5 6 7 8 9 10 11 



15 



OP CODE 


REG 
NO. 


LOCA- 
TION 


Otfl 


WORD NUMBER 



1 00=LOAD 
101=STORE 



00=PRB 
1 =PDT 
10=LDT 



The assembler directives that define the instruction are as follows: 

REG FRM 5,3,2,6 

LOAD EQU 4 

STORE EQU 5 

PRB EQU 

PDT EQU 1 

LDT EQU 2 



The general form of the instruction is: 
REG 



[ LOAD 1 

^, m _^„r , <register number>, 
.STOREJ ' 5 



fPRB ' 
PDT 
LDT . 



<word number> 



For example, the expression: 

IOCOM 

REG STORE, A, PDT, 6 
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transfers the contents of the A Register to word 6 of the PDT. Similarly, 
the expression: 

IOCOM 

REG LOAD, M, LDT, 

transfers the contents of word of the LDT to the M Register. 

The execution time for this utility is 20.25 to 23.25 microseconds. 

D. 2. 3. 5 READ /WRITE I/O BUS TO/FROM REGISTER. This routine al- 
lows the DSR to transfer the contents of a register to the I/O Bus, or to fill 
a particular register from the I/O Bus. The machine instruction appears in 
the following format: 



10 11 12 13 



15 



OP CODE 


NOT USED 




5 s 


REGISTER 
NUMBER 




/ 


^^_, 


1 1 0=READ 
1 1 1=WR1TE 


0=DATA 

1 ^COMMAND 



The assembler directives that define the instruction are as follows: 

IOBUS FRM 5,7,4 

READ EQU 6 

WRITE EQU 7 

DATA EQU 

CMMD EQU 1 



The general form of the instruction is: 



IOBUS 



f READ 1 f DATA \ 

[WRITE! ' I CMMD 1 ' <"8 18t » numbw > 



For example, the expression: 

IOCOM 

IOBUS READ, DATA, X 

transfers data from the I/O Bus to the X Register. Similarly, the expression: 

IOCOM 

IOBUS WRITE, CMMD, A 

transfers a command from the A Register to the I/O Bus. 

The execution time for this utility is 29. 00 to 40. 50 microseconds. 
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D.2. 3. 6 EXIT DSR. This routine links the DSR to the proper routine to 
handle the conditions that exist when the DSR is completed. The machine 
instruction for this routine appears in the following format: 








6 


7 


8 




1 5 


OP CODE 


Otf> 


ERROR NUMBER 
(SEE APPENDIX C) 



010 0000=NORMAL 

1 000 1 ^-ABORT 

10 00 1 -RETRY 

10 00 11 =DTERR 

010 1 00=EOR 



The assembler directives that define the instruction are as follows: 



EXIT FRM 7, 9 

NORM EQU 20 

ABORT EQU 21 

RETRY EQU 22 

DTERR EQU 23 

EOR EQU 24 



16 
16 
16 
16 
16 



The general form of the instruction is 

EXIT | type \ , -I error number | Error number is ignored for 

NORM and EOR exits. 

For example, the expression: 

IOCOM 

EXIT NORM, 

indicates a normal exit from the DSR. Also, the expression: 

IOCOM 

EXIT ABORT, 9 

indicates that the operation was aborted due to an attempt to execute an 
illegal I/O operation to the device (error code 9). 

D.2.3.7 PUT /GET. This routine performs character transfer between a 
packed buffer and a specified register. The PUT routine transfers a charac- 
ter from the right half of the register to the packed buffer and increments the 
PRB character count. The routine may also set bit of the register to indi- 
cate that storing that character filled the buffer space. If the buffer space is 
already full, the routine sets bit 1 of the register to indicate that the charac- 
ter was not stored. The GET routine transfers a character from the buffer 
to the right half of the specified register and increments the output count con- 
tained in the first word of the temporary storage area of the PDT. The rou- 
tine may also set bit of the register to indicate that fetching the current 
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character emptied the buffer. If the buffer is already empty, the routine 
sets bit 1 to indicate that no character is available. The machine instruction 
for this routine appears in the following format: 



4 5 



12 13 



15 



OP CODE 


NOT USED 


REGISTER 
NUMBER 



10 10 =PUT 
0101 T=GET 



The assembler directives that define the instruction are as follows: 



CHAR 


FRM 


5, 11 


PUT 


EQU 


A 1A 


GET 


EQU 


B 16 



The general form of the instruction is: 



f PUT 
CHAR \ „__ \ , <register number> 



[get 

For example, the expression: 



CHAR PUT,M 

transfers a character from the M Register to a packed buffer. Similarly, 
the expression: 

IOCOM 
CHAR GET,E 

transfers a character from a packed buffer to the E Register. 

The execution time for the put and get utilities between 58.25 to 67. 00 micro- 
seconds and 49.50 to 55.50 microseconds, respectively. 

D.2.4 PHYSICAL DEVICE TABLES 

A Physical Device Table (PDT) contains parameters, such as device ad- 
dresses and special attributes, that are necessary for control and perfor- 
mance of an I/O operation. Figure D-2 illustrates the format for a standard 
PDT and Table D- 1 defines each of the fields. Device Service Routines use 
the PDT's for temporary data storage between interrupts. Each device with- 
in a system has a PDT containing information exclusive to that device. How- 
ever, one common DSR may be used to coordinate I/O operations for a group 
of identical devices. 
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WORD 


1 



1 



1 1 



1 2 



1 3 



1 4 



1 5 



1 6 



1 7 



1 8 



1 9 



NEXT PDT ADDRESS 



FLAGS 



INTERNAL DEVICE NUMBER 



ASSIGN COUNT 



COMMIT PRIORITY 



OPEN COUNT 



LOCKING LDT POINTER 



ERROR CODE 



SVC INDEX 



DEVICE ATTRIBUTES 



DEVICE 



NAME 



POINTER TO EXTENDED PDT OR EXTERNAL REGISTER 



I/O LOAD FACTOR 



TIMEOUT 



DSR INTERRUPT ENTRY 



PRB ADDRESS 



LDT ADDRESS 



I/O DONE EVENT LINK 



DATA BUFFER ADDRESS 



UNSOLICITED INTERRUPT PROCESSING 



OUTPUT CHARACTER COUNT 



DSR 
TEMPORARY STORAGE AREA 
(VARIES FOR EACH DEVICE) 



(A)1 30248 



Figure D-2. Physical Device Table General Structure 
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Table D-l. Standard PDT Field Definitions 



Word 



Bits 



0-15 



9 
10-11 



0-7 



8-15 

0-7 

8-15 

0-15 

0-7 



Definition 



PDT chain word, pointer to the next PDT. Zero in this 
word indicates that this is the last PDT in the system. 

Device Busy Flag - initially zero and set by I/O manager, 






vnl-iQ I Ur to-k» 



ero. 



Exclusive access/shared access flag set by assignment. 
Initially zero (shared access) by Job Manager. 

Exclusive access/shared access flag set at OPEN time 
by I/O Manager. Initially zero (shared access). 

Locked/not Locked flag. Initially zero (not locked) and 
set by I/O Manager. 

ONLINE/OFFLINE status set by online processor. 

Not sharable/sharable attribute set at system generation. 

Extended PDT indicator . When set, word 10 contains 
pointer to an Extended PDT for a central controller. 

RESERVED - initially zero. 

System/user mode indicator - used only for system con- 
sole data terminal by I/O manager and DSR to determine 
whether device is in a system or user mode. Initially 



zero. 



T">C"D -,-,^a.A f U « c • T/O "N/f-a *->o rta. 
iyi_ij.v uocu nags, a./ >^y ivxunagv> 



■»• -KOo<a+-o 4-/-> 



initial DSR entry. 

Internal device identification number - Each PDT has a 
unique number. Identification numbers 0-20, inclusive, 
are reserved and should not be used. All others are 
assigned according to table 2-2. 

Commit priority - initially zero. 

Assign count, initially zero. 

Open count, initially zero 

Locking LDT pointer, initially zero. 

This byte indicates the operation status upon completion; 
initially zero, it is controlled by the I/O manager and 
DSR exit utilities. 
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Word 



Table D-l. Standard PDT Field Definitions (Continued; 



Bits 



Definition 



5 
(con't) 



7-9 



i-15 



1 


2 


3 


4 


5 


6 


7 


8 


9 


10 


11 


12 


13 


14-15 



0-15 



181 


182 


183 


184 



SVC index - Determines which DSR is to be called. The 
value is determined by the memory image phase (MIP) 
containing the DSR, as follows: 
MIP SVC Index 

22 

23 
24 
25 

Device attributes. Returned in the PRB when the device 
is opened. 

System console only 

Dummy device only 

Rewindable 

Device can be forward spaced 

Device can be back spaced 

Printing Device 

ASR 733 cassette 

Data Terminal or CRT 

Disc 

Input 

Output 

USASCII Device 

Binary Device 

Polled CRT 

00 - Non-disc Device 

01 - Linked Sequential Disc File 

10 - Relative Record Disc File 

11 - Indexed Disc File 

Device Name - This may be any valid USASCII 6 charac- 
ter string which has not previously been used as a device 
name. 
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Table D- 1 . Standard PDT Field Definitions (Continued) 



Word 



Bits 



Definition 



10 



0-15 



11 



0-7 
8-15 



12 



0-15 



13 

14 
15 
16 



0-15 
0-15 
0-15 
0-15 



If the Extended PDT flag is set, then this word contains 
the address of the Extended PDT. If this is a data bus de- 
vice and the I/O utilities are to be used, this word con- 
tains two possible device addresses. Refer to I/O Util- 
•?4-T£»g /iog/>i«i«finn ij-> 4-iri g g s^^i^x! ''^the r T vi s e this ,Tr, ~ v r d 
is available for DSR use. 

I/O load factor. 

Device Timeout - can be selected by loading value less 
than 255 into the timeout count byte of the PDT. Counting 
begins when an I/O Call is initially processed. If a de- 
vice is timed out before the data transfer is complete, a 
correctable I/O error occurs. Each count corresponds to 
one second to allow a maximum timeout of 4 minutes and 
14 seconds. Some devices will require resetting the last 
record. 

Keyboard type devices do not normally have a timeout. 
The timeout in the PDT's should be set to FF, , to specify 
no timeout. 

DSR interrupt entry - Initially points to a set of code that 
performs a required task when an I/O operation is not 
currently being done to this device. Normally the only 
logic required clears the interrupt and returns control to 
the system. This word is controlled by the entry and exit 
utilities. This code may reside in the Extended PDT or 
temporary storage area. This entry normally handles 
unexpected hardware interrupts. 

PRB Pointer for the PRB currently being processed by a 
DSR. Initially zero. 

Logical Device Table (LDT) pointer for the LDT currently 
being processed by the DSR. Initially zero. 

I/O done event link controlled by the exit utilities and the 
system task scheduler. Initially zero. 

If the operation currently being processed by a DSR is a 
Read Binary, Read USASCII, Write USASCII, Write 
Binary, Write Direct, or Read Direct, then this word 
contains the data buffer address associated with the oper- 
ation. This word is initially zero. 
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Table D-l. Standard PDT Field Definitions (Continued) 



Word 



17 
18 



19 



Bits 



0-15 



0-15 



Definition 



Same as word 12. 

Used by the utilities to maintain an output character count. 
Should be set to zero by the DSR at the start of character 
retrievals from the data buffer. Otherwise, this word is 
available for DSR use. 

This area contains any temporary data or device dependent 
information required by the DSR. 



Controllers that handle more than one identical device (moving head disc con- 
troller or magnetic tape controller for example) are not completely separate 
physical devices. Therefore, each multiple unit controller has an Extended 
PDT in addition to the regular PDT's for the separate devices connected to 
the controller. Figure D-3 illustrates the format for an extended PDT. 
Table D-2 defines each of the fields. The Extended PDT helps the I/O Manag- 
er determine the busy status of the controller and its individual devices, and 
also indicates which of several PDT's associated with the bus address applies 
to a generated interrupt. When an I/O operation is initiated, the I/O Manager 
sets the PDT pointer into Word 1 of the Extended PDT. The PDT address 
table contains a pointer to the Extended PDT instead of the PDT itself. When 
an interrupt occurs from one of the controller's devices, the Interrupt De- 
coders check the PDT Address Table to determine the address of the Extended 
PDT. The decoders then use data in the temporary storage area of the Ex- 
tended PDT to determine which device PDT is associated with the interrupting 
device. 



(A)1 30249 



WORD 


1 



ACTIVE PDT POINTER 



EXTERNAL REGISTER 



FLAG WORD 



DATA TERMINAL PDT POINTER 



VARIABLE DSR TEMPORARY STORAGE 



Figure D-3. Extended PDT General Structure 
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Table D-,2. Extended PDT Field Definitions 



Word 



Definition 



Must be FFFF 



16 



Active PDT Pointer - controlled by I/O Manager if the Extended 
PDT bit is set in the device PDT (Word 1, Bit 8). 

External Register - used for command or data re CT ister b^ r I^O 
bus device. Available for DSR use if device is on the DMAC. 

Bit - set to indicate controller busy. 

Bit 1 - set to indicate a Silent 700 Series Data Terminal Extended 
PDT. Word should be initially set to zero. 

Pointer to Data Terminal PDT if Word 3, Bit 1 is set. Other- 
wise may be used as temporary storage. 

Mode control for 733 ASR Cassette if Word 3, Bit 1 is set. 
Otherwise may be used as temporary storage. Initially zero. 



Bit 8 of Word 1 in the device PDT indicates to the I/O Manager that an Ex- 
tended PDT exists for a central controller. If that bit is set, the I/O Man- 
ager retrieves the Extended PDT Pointer from Word 10 of the device PDT 
to access the Extended PDT. It then examines Bit of Word 3 of the Extended 
PDT to determine if the controller is busy. 

D. 2 . 5 LOGICAL DEVICE TABLE 

The Logical Device Table (LDT) equates logical device numbers to physical 
devices or files. Figure D-4 illustrates the table format. Table D-3 pro- 
vides a detailed breakdown of the fields. Job Management creates and de- 
letes LDT's. When an I/O call is made, the I/O Call Processor searches 
the linked LDT's for a LUN definition. If it finds the LUN, it prepares 





WORD 


1 

2 
3 
4 

5 


FLAGS 




KEY 


LENGTH 


LUN 




PDT/FCB POINTER 




RECORD LENGTH 




NEXT LDT ADDRESS 




UTILITY POINTER 


(A 1 30 250 











Figure D-4. DX980 Logical Device Table Format 
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Word 



Bit 





1 

2 

3 

4 

5 

6 

7 

8 

9 
10 
11 
12 
13 
14-15 
0-7 
8-15 
0-15 

0-15 
0-15 



Table D-3. LDT Field Definitions 



Definition 



Device open 

File 

Blocked 
Reserved 

Return on I/O Error 
Busy- 
Pass LDT 
Delete LDT 
Return on Retry 
Password - Owner 
Password Protected 
No Password Protection 
Temporary 
User/Creator Access 
Not Used 

Key length - for files only 
LUN 

Pointer to PDT for devices. Pointer to File Control 
Block for files. 

Record length 

Pointer to next LDT - zero if last LDT; Anchor is in Job 
Control Block. 

Pointer to Record Control Block for files. 



for either a DSR or a File Management entry, and relinguishes control to the 
correct DSR or File Management Routine. If it does not find a definition for 
the LUN, an error condition exists and the I/O call cannot be executed. 
Open and close calls change the LDT Flags and Pointers as necessary. 
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D. 2. 6 DEVICE TIMING FACTORS 

Many I/O Bus interrupts are time- critical, whereas DMAC interrupts gener- 
ally are not. Two factors affect I/O Bus interrupt performance: 

1. The worst-case time to service the high-priority device, 

2. The percentage of CPU time required to service interrupts. 

D.2. 5. 1 WORST-CASE I/O BUS INTERRUPT LATENCY TIME. The worst- 
case idLeflcy Lime uu s«=r v n — - - ■•»-•■■»-" - *- ■ ■ - *- 



ice nign- ui iGx j-'-y -w v -^ j-»u.d <^ 



evice is 






Ulli WJ 



following: 



Factor 



Maximum Time Required 



1. The longest code sequence when inter- 
rupts can be masked. This occurs im- 
mediately after a previous interrupt has 
been decoded and includes set-up for 
DSR entry, DSR execution, DSR exit 
and return to the correct machine state, 

2. Interrupt execution time that is a hard- 
ware function and does not add to the 
latency time. 

3. Retaining the current state of the ma- 
chine and identifying the interrupt, plus 
setting-up for DSR entry. These fac- 
tors are controlled by the I/O Bus Inter- 
rupt Decoder. 

4. DSR execution to the internal point of 
I/O is dependent upon the DSR being used. 

Total worst case latency time to 
honor a high priority I/O Bus 
interrupt 



400 microseconds 



N/A 



40 microseconds 



60 microseconds 



=505 microseconds 



Table D-4 lists the character interval times of some standard I/O Bus 
peripheral devices. 

D.2.6.2 INTERRUPT HANDLING CAPACITY. The worst- case percentage 
of CPU time required by a I/O Bus device is calculated by: 



WORST- CASE INTERRUPT SERVICE TIME 
TIME BETWEEN INTERRUPTS 



X 100 



The worst-case percentage of CPU time required by a DMAC device during 
the actual transfer is: 

# WORDS PER SECOND X 0. 000075 



D-19 



Digital Systems Division 




943005-9701 



Table D-4. I/O Data Rates and CPU Loading 







Maximum 


Device 


Character Time 


System Load 
(Worst Case) 


9600 Baud Modem 


1040 (J.S. 


29.0 % 


1200 Baud Modem 


8333 [iS. 


3.5 % 


300 Baud Modem 


33, 333^S. 


.91% 


110 Baud Modem 


100, 000 H-S. 


.3 % 


300 CPM Card Reader 


1760(aS. 


17. % 


Moving Head Disc 


(DMAC) 


7.25% 


Model 979 Tape Transport 


(DMAC) 


1.25% 


DS330 Disc System 


(DMAC) 


36. % 


High Speed Paper Tape Reader 


3333 (JiS. 


9.1 % 


High Speed Paper Tape Punch 


13, 333H-S. 


2.3 % 


2310 Line Printer 


(DMAC) 


.02% 



The worst-case I/O Bus interrupt service time is the sum of the worst cases 
of: 

1. Interrupt identification and DSR entry time (45 microseconds) 

2. DSR execution time (350 microseconds) 

3. DSR exit until interrupts are re-enabled (40^-S. microseconds) 

The total worst case time is 435 microseconds. The system can handle any 
combination of devices concurrently until the available CPU time is exceeded. 
The best performance occurs if the higher transfer rate devices are assigned 
to the high priorities. 

D. 2. 6. 3 SYSTEM OVERLOAD PREVENTION. The maximum system load 
percentage for each device is represented in the individual Physical Device 
Tables. The I/O Manager routines monitor the system I/O load at all times. 
If an I/O call is made that causes the load to exceed 90%, the task is queued 
until more CPU time is available. Higher- speed DSR' s are designed with 
system load in mind and frequently show a significant improvement over the 
worst-case percentages. 

D.2.7 CONFIGURATION LIMITATIONS 

The Model 980 Computer has four catagories of interrupts: Internal, Priority 
Option, Direct Memory Access Channel (DMAC), and I/O Bus. Internal inter- 
rupts are not directly related to I/O transfers and are handled as a separate 
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function. The I/O interrupt decoders assign the I/O Bus interrupts a higher 
priority than DMAC interrupts (this is different than the hardware priority 
assignment). Within the I/O Bus and DMAC interrupt levels, there is also 
a definite priority structure. I/O Bus interrupt handling has the greatest im- 
pact on overall system performance. 

Versions of the I/O Bus interrupt decoder support the following I/O configur- 
ations: 

Maximum I/O Ports With (Without) 
I/O Configuration Internal Expansion 

Internal Only 13(4) 

1 Expander 22 (13) 

2 Expanders 31 (22) 

3 Expanders 40 (31) 

4 Expanders 49 (40) 

Figure D-5 illustrates priority the structure for internal expansion only. 
Figure D-6 illustrates the maximum I/O Bus configuration. The PDT pointer 
tables list the location of the PDT or Extended PDT associated with that de- 
vice. If less than the maximum configuration is used, expanders should be 
added in the numerical order indicated. Tnfprnal ^v-nanoi'^r-i wa^r ~~ -^-.^ ^„t 
be included. If an I/O expander is not included, its internal port may be used 
for an I/O device. Figure D-7 shows the DMAC expander table. 

The following equation determines the maximum number of ports per hardware 
configuration: 

(# of expanders x 1.0) + (13 - # of expanders) 

D.2.8 DX9 80 CONVENTIONS 

Some general rules apply to all sequential I/O devices as well as sequential 
disc files. Devices capable of both reading and writing cannot arbitrarily 
switch between Read/Write modes. The restrictions vary from device to 
device. Do not close and re-open a device to circumvent these restrictions; 
the results are unpredictable and different for each device. All DSR's should 
ignore I/O opcode 17 and 18 to allow for expansion with new functions. Op- 
codes above 20 are generally in error, although some are legal for random 
access to disc files and other device-dependent functions. For opcodes 0-3 
and 19-20, the I/O Call Processor checks for allowable data buffers. Use 
these opcodes for data transfer functions. Use opcodes above 29 for special 
functions that do not directly involve a data transfer. The basic functions, 
Open and Close are processed by all standard Device Service Routines. All 
sequential writing DSR's provide a command to write an end- of -file. For 
most devices this is a /* record. The end-of-file command should always 
be used in lieu of writing a /* for that purpose. 
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1 3 


1 4 


1 5 


* 










* 


* 




* INDICATES NO 
DEVICE WITH DESIGNATED 
PRIORITY. 



I/O BUS POINTER TABLE 



io 16 






PDT 


POINTER 


(OR 


0)*1ST 


PRIORITY 


PDT 


POINTER 


(OR 


0)* 2ND 


PRIORITY 


PDT 


POINTER 


(OR 


0)*3RD 


PRIORITY 


PDT 


POINTER 


(OR 


0)* 4TH 


PRIORITY 


PDT 


POINTER 


(OR 


0)* 5TH 


PRIORITY 


PDT 


POINTER 


(OR 


0)* 6TH 


PRIORITY 


PDT 


POINTER 


(OR 


0)* 7TH 


PRIORITY 


PDT 


POINTER 


(OR 


0)* 8TH 


PRIORITY 


PDT 


POINTER 


(OR 


0)* 9TH 


PRIORITY 


PDT 


POINTER 


(OR 


0)* 1 OTH PRIORITY 


PDT 


POINTER 


(OR 


0)* 1 1TH PRIORITY 


PDT 


POINTER 


(OR 


0) 1 2TH PRIORITY 


PDT 


POINTER 


(OR 


0)* 1 3TH PRIORITY 
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Figure D-5. PDT Branch Table with Internal Expansion Only 
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PORT 1 EXPANSION WORD 
2 3 4 5 6 7 8 9 10 11 12 13 14 15 











— 

























J 





PORT 1 PDT POINTER 
TABLE 




• • • 

BIT SET IN 

EXPANSION WORD 

POINTS TO 

CORRESPONDING WORD 

IN POINTER 

TABLE* 




NOT USED 






NOT USED 




NOT USED 




NOT USED 




NOT USED 




PRIORITY 1 










2 


• 
• 
• 




3 




4 




5 




6 




7 




6 




g 




PRIORITY 10 




* 




NOT USED 




[ NOT USED 





PORT 3 EXPANSION WORD 








1 


2 


3 


4 


5 


6 


7 


8 


9 


10 


1 1 


12 


13 


14 


15 










































PORT 
POINTE 


3 PDT 
R TABLE 






• • • 

BIT SET IN 

EXPANSION WORD 

POINTS TO 

CORRESPONDING WORD 

IN POINTER 

TABLE* 




NOT USED 






NOT USED 




NOT USED 




NOT USED 




NOT USED 




PRIORITY 21 












22 


• 

• 
• 




23 




24 




25 




26 




27 




28 




29 




PRIORITY 30 










NOT USED 




NOT USED 





I/O BUS INTERNAL EXPANSION WORD 
3 4 5 6 7 8 9 10 11 12 



PORT 2 EXPANSION WORD 








1 


2 


3 


4 


5 


6 


7 


8 


9 


10 


11 


12 


13 


14 


15 










































PORT 2 PDT 
POINTER TABLE 




• • • 

BIT SET IN 

EXPANSION WORD 

POINTS TO 

CORRESPONDING WORD 

IN POINTER 

TABLE* 




NOT USED 






NOT USED 




NOT USED 




NOT USED 




NOT USED 




PRIORITY 1 1 




* 






12 


• 
• 
• 




13 




14 




15 




16 




17 




18 




19 




PRIORITY 20 








NOT USED 




NOT USED 





INTERNAL EXPANSION 
PDT POINTER TABLE 






NOT USED 


1 


NOT USED 


2 


NOT USED 


3 


NOT USED 


4 


PRIORITY 41 


5 


42 


6 


43 


7 


44 


8 


45 


9 


46 


10 


47 


1 1 


48 


12 


PRIORITY 49 


13 


NOT USED 


14 


NOT USED 


15 


NOT USED 


16 


NOT USED 



PORT 4 EXPANSION WORD 
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 



WORD 



































rr 







PORT 4 PDT 
POINTER TABLE 




• • • 

BIT SET IN 

EXPANSION WORD 

POINTS TO 

CORRESPONDING WORD 

IN POINTER 

TABLE* 




NOT USED 






NOT USED 




NOT USED 




NOT USED 




NOT USED 




PRIORITY 31 










32 


• 

• 
• 




33 




34 




35 




36 




37 




38 




39 




PRir-RITY 40 








NOT USED 




NOT USED 





* NOTE: GENERAL FORM FOR PRIORITY 
OF A PARTICULAR PDT IS 
GIVEN by: 

10(n-l) 4 (W-4) 

WHERE 
n -PORT NUMBER 
W = POINTER TABLE WORD NUMBER 



Figure D-6. Priority Scheme for Max- 
imum I/O Expansion 
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D.2.9 DSR WRITING PROCEDURE 

The recommended method for writing a DSR uses a defined, consistent struc- 
ture. The approach breaks up the DSR into unique processing steps. Each 
step is controlled by a branch vector, similar to the operation of a hardware 
state controller, The branch vector serves as the next state identifier. This 
technique is not suitable for all DSR's. DSR's that do not have several unique 
processing steps are inappropriate for this convention. 

u»c, y» i i^nxLiX'jMJXrt. x vu£s t .oeiore designing «± uoi\, unaersLcina cornpieteiy 
how the hardware interface works. Research sufficient interface documenta- 
tion (usually available) to develop a familiarity with the interface. When de- 
veloping new hardware, design both the interface and DSR before constructing 
either one. Very often, a simple hardware addition can save a considerable 
amount of software, and vice-versa. In some cases, special features that 
look desirable when only considering the hardware may actually make the 
software more complicated and are best eliminated. 

D.2.9. 2 REENTRANT DSR'S. DX980 DSR's can service multiple identical 
devices with one copy of the procedure. A data base consisting of several 
I/O tables described earlier is required for each individual device. The 
DSR's also appear to service multiple devices simultaneously because when 
an I/O interrupt occurs, it is serviced very quickly for the interrupting de- 
vice* Once the interrunt service has begun, however, another interrupt can- 
not be serviced until the service for the current one has been completed. 

All registers and DSR local storage are lost between interrupts for a device. 
All data needed for a subsequent execution of a DSR is saved in a temporary 
storage area of the device's Physical Device Table (PDT). This temporary 
storage area is whatever size is needed by the DSR and begins at the end of 
those entries required by the I/O Manager, Do not save data locally in a 
DSR even when only one device is serviced by it. If a second device is ever 
added, the DSR will not work. Furthermore, PDT storage usually takes the 
same amount of code and memory as local DSR storage. Therefore, whether 
or not the DSR's appear to be reentrant, code them as if they were; with all 
data storage being done in the PDT. 

D. 2. 9. 3 STRUCTURING THE DSR. First determine how many interrupt 
entry points will be necessary. To do this requires breaking the I/O transfer 
operation into its major components. This is not always an obvious decision. 
Hold the number of states to a reasonable level. 

For example, consider the high-speed paper tape punch interface. A write 
operation involves sending the requested data on a character basis to the in- 
terface. The DSR is initially in an idle state that clears interrupts and re- 
turns control back to the system. When an output request is initiated by the 
IO Manager, the DSR sends a character to the interfaces, sets its next state 
to one that continues sending characters upon interrupt, and exits normally. 
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PDT POINTER (OR 0)*1ST PRIORITY 


2ND PRIORITY 


3RD PRIORITY 


4TH PRIORITY 


5TH PRIORITY 




6TH PRIORITY 


7TH PRIORITY 


PDT POINTER (OR 0) 8TH PRIORITY 






*0 INDICATES NO 
DEVICE WITH THIS 
PRIORITY. 
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Figure D-7. DMAC Expansion Table PDT Pointer 

When the DSR senses that it is about to send the last character, it changes 
state to exit the DSR with an End-of-Record exit. When this state is exe- 
cuted, the state is again set to idle and the DSR is exited. This procedure 
involves changing the state of the DSR several times. Upon an interrupt 
entry, the DSR only needs to clear the interrupt and branch via the next state 
vector. 

Figure D-8 and table D-5 provide a flowchart and listing, respectively, of 
the paper tape punch DSR. Following that, figure D-9 and table D-6 provide 
a more complex example, the data terminal DSR. 

D.2.9.4 CODING PDT BUILDER. When configuring the DX980 system at 
Initial Program Load (IPL) time include all the hardware configuration that 
is going to be used on the total system. This allows adding a device by 
adding only the PDT pointer to PDT branch tables since these tables already 
exist. The PDT Builder utility then has access to these tables using pointers 
and labels defined in table D-7. Figure D-10 outlines the steps required to 
add the new PDT using the PDT Builder utility. The remainder of this para- 
graph describes these events. 
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01/16/7* 
CHART TITLE - PAPER TAPE PUNCH DEVICE SERVICE ROUTINE 



AUTUFLOU CHART SET 



/ IGNOR 
51.55* — > 



1ST TwO .OKDS Of 

DSK ARE ENTRY 

DISPLACEMENTS FOR 

INTERRUPTS AND 

CANCELS 



IMITIAL ENTRY POINT 



ENABLE 
INTERRUPT 
CUNTROL 



/ READ 

/STATUS-THIS IS / 
'A KLUG TO CLEAR/ 
THE INTERRUPT / 



OPERATION 

•CODE WITHIN* 

*LIMITS?» 



SETUP TU CALL 

ECFEGR ROUTINE TO 

OUTPUT AN EOF AND 

A TRAILER 



« FINISHED 

OUTPUTTING 
« BLANKS? 



/ PUNCH A BLANK / 



riRA^CH VI 


A TABLE 1 


USING UP 


CODE AS 


INDEX I 


JPCDER 


1.0b 


OPCOER 


1.06 


»T4SCI 


1.25 


«THNY 


2.U4 


"IPCUER 


1.06 


JPCOfcR 


1.56 


UPC HER 


1.06 


LJRTFL 


1.19 


EXTFOR 


1.59 


ClSkEF 


1.11 


CLSndF 


1.11 


EXTE/lf- 


1.09 


ION.jk 


1.U4 


UP-C'U* 


1. J6 


l.'PCJE^ 


1.06 


IGW* 


1.08 


I»N!JR 


1.03 


IG^IUR 


1.58 


DIRECT 


1.24 


JPCDES 


1.56 



THIS ROUTINE 

OUTPUTS AN EOF IF 

REG X =7 AND AN 

EOK IF X=5,UP0N 

COMPLETION OF 

PROCESS VECTOR IS 

SET ACCORDING TO 

THE VALUE IN KEG 

E ON ENTRY 



/ OUTPUT NEXT 
CHARACTER FOR 
AN EOR/EOF / 



FINISHED 
OUTPUT OF 
EOF/FOR? 



awaiting further 
interrupts on this 

PROCESS 



/ DIRECT / 
01.05 >| 



1 SET DIRECT rfRITE 1 
1 BIT 1 


51.55 > 

WTASCI 1 




25 


1 SET VECTOR 
1 IVPTP3 


TO 


1 


1 * 


1 ZERO OUTPUT 


COUNT | 


IVPTP3 1 




27 


! GET CHAftAC 


TfcR 


! 



SET VECTOR AS 

SPECIFIED ON 

ENTRY 



NO * IS THIS * 
— * CHARACTER THE * 
* LAST TO * 

♦OUTPUT?* 



AWAITING FURTHER 

INTERRUPTS ON THIS 

PROCESS 



Figure D-8. Paper Tape Punch DSR (Sheet 1 of 2) 
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CHART TITLE 



AUTOFLOW CHART SET - 



- PAPER TAPE PUNCH DEVICE SERVICE ROUTINE 



/ IVPTP* / 



/ WTBINY / 



» DIRECT PUNCH? *- 



SETECR 



INITIATE 

REGISTERS TO CALL 

EOFECR FOR AN EOR 

ANU TERMINATt 

ITERATION 



. 1.13. 

... EOFEOR 



INTFRkUPT ENThY POINT 

INTERS I 03 

| REA) STATUS - | 

KLUG TO CLEAR 
I INTERRUPT | 



bRANCH VIA VECTOR 



IVPTP6 I 05 
I GET CHARACTER I 



I YES * HAS THE * 

+ * SUFFER 3E EN * 

*EXHAJSTED? * 



USING HALF BYTE 
AS INDEX PICKUP 
DATA TO JUT PUT 



/ IVPTP5 / 



Figure D-8. Paper Tape Punch DSR (Sheet 2 of 2) 
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Table D-5. Paper Tape Punch DSR Listing 



SAP R9L.C 

PTP 08R • INITIAL ENTRY 



0001 
000? 
0003 

0004 
0005 

0007 

09108 

00K? 1 

55011 

001? 

0013 

0014 
001B 
0010 
0017 

0018 
001S 
0020 

0021 
0022 
0023 
0<*24 

0025 
fc02<5 
0027 
0028 
002*? 
0030* 
0«31 

i» m i »» 
*' *■■ »? * 

0P«37i 
tf*34 
B03S 
H03B 
«JC37 
Gif*38 
0R3C 
0G»4??: 
1***1 
0B4? 

00 47, 
0*44 

004f, 
004^ 
0*47 
0(^48 
0049 
005"! 
0C»51 
0*52 
0*53 



SHEET 0001 



943117 



TEXAS INSTRUMENTS. INC. PART#9431 1 7-9901 



TOT IPPTP 
ft********************************************************* 



TITLE 

AUTHOR 

SYSTEM 

ABSTRACT 



« HIGH SPEFD PAPER TAPE PLINTH DEVICE SERVICE R 
»I8PTP» 

« ER*'EST BONUGLI, 01/74 

■ DXQ8<* 



THIS ROUTINE PROVIDES THE INTERFACE 

BETWEEN THE PAPER TAPE PUNCH CONTROLLER 

ANO THE OXQB0 SYSTEM. 
MAJOR FUNCTIONS 11 THE HUSH SPEED PAPER TAPE PUNCH 

HSR PUNCHES DATA ON 8 LEVEL PAPER 
TAPES Tfc AW ASCII, BINARY, OR OIPECT 
MOPE, 

21 AC8IT RECORDS ARE WRITTEN AS ONE 
FRAME PER CHARACTER, THE DATA 
PUNCHED HIRECT! V FROM THE DATA BUF- 
FER WITH NO CONVERSIONS. 

81 FACH RFCnRH IS TERMINATED WITH A 

"E4DER OFF CHARACTER (X*0FE1 AND 4 
DELETE (RUPDHT5 CHARACTERS. 



FRAMES PER WORD. 
81 ON WRITE OIRECT MO END OF RECORD 

INDICATOR IS PUNCHED. 
NO PUNCH ERRnRS ARE OETECTARLE 
OPFR4TTO W DOPE ERRORS - ABORT 



ERRORS 



TNPIJT 



OUTPUT 



« THE FOLLOWING ARGUMENT IS PASSED 

fPOT«, INITIAL/CANCEL CALL INDICATOR! 

ALL DSR nn A CALL TO ISDSRT TO OBTAIN THE 
FOI.LO'4INRS: 

E ■ 

M ■ PRB # 

a • POT • 

A ANH V ■ OPERATION CODE 

8 ■ UTTLTTV ENTRY 

BRANCH INTO INITIAL OR CANCEL FNTR 

» MO^E 
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Table D-5. Paper Tape Punch DSR Listing (Continued) 



SAP H?ir 

PTP o«« m INITIAL EWTPY 



SHEET 0!C*0? 



*W57 
0*58 
fl*59 
HPiftfl 
0*61 



ROUTTMFS 

TALLFO « T/n HTTLTTTE* 

svcs USEH « Mf>E 



ft*************************************************** 
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Table D-5. Paper Tape Punch DSR Listing (Continued) 



SAP «?lC 

PTP 0*R • INITIAL ENTRY 



SHEET 0003 



0021 
0009 

000P 
0001 
0i*0P 
0002 
0P02 
0d03 

0004 
0f»0*> 

000ft 
0«07 

0*01 

0H0A 
0P0P 

fc02f 
0024 



0062 

0063 
0064 
0065 
0063 
0087 
0069 
00SQ 
0070 
0071 
0072 
0073 
0074 
0075 

007< r 

0077 
0«78 
0075 
0080 
0081 
0082 
0087, 

am a t 

WJ T. ^ «, 

0085 

008« 
0<*87 
0088 
0089 
0O«9ff 
0091 
009? 
0)7193 
0094 



PEJ 

REF ISD8RT 

HFF ISPTP 

* 

* I/n UTILITY EQUATES 

I***************************************************** 

incnw npn >c7C7,5 

A 80RT EQU >21 
OPDFRR FQU 9 



BIT 

SET 

CLEAR 

POT 

PRB 

LOT 

SKTP0 

SKIP1 

REG 

CDAH 

STORE 

t nai ic 

J. < i U ' I w 

READ 

WRITE 

DATA 

e*Mn 

CHAP 

PUT 

RET 

EXIT 

NfiRV 

EHR 



FRM 5,9,5,4 



FQU 
FQU 
FQU 
FQU 
FQ'i 
FQU 
EQU 
FRM 
FQU 
FQU 
FRM 
EQU 
FQU 
FQU 
FQU 
FRM 
FQU 
FQU 
FRM 
FQU 
FQU 



1 

1 



2 
2 
3 
5,3,2,6 

4 
5 

ft 7 _ A 
« » ' l - 

6 
7 


i 

5,n 

>A 

>P 

7,9 

>?0 

>?4 
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Table D-5. Paper Tape Punch DSR Listing (Continued) 



Sap *9|_r 

DTP o*9 - INITIAL ENTRY 



SHFET 0O(f)4 



0*9-I PEJ 

0P97 * 

H093 * REGISTER enLUTFS 

*f*95 * 



010? 



'A * / P v* 1 R 1 A 

i* ? 1 a l r F 

fl''J»? 0103 X 

0*0? 0104 M 

0*»04 010K S 

ri « (n S fl 1 ft fi L. 

ea?*f 01&7 R 

HP07 JM0B P 

0f*0i 010c po 



♦ ♦•t***************************************************^^ 



FQLi ft 

FQM 1 

FQl! 2 

POM 3 

FOU 4 

FQl I 5 

FQU 6 

POM 7 

FQU 1 

dl 1* *****+*********+***#**#******##****#** # **«#** ###### * ## ^ #### 
0111 * 
till? * PRB 
P1 1 t 3 # 

1 14 **+***••*+***+***#*+*+**#+* *##*#***#♦**♦*##*#*♦**********»* 
0W Hi IK PRRSFI. FQl' PI «YSTFH Fl AG WORD 

0*0? 0117 PBBFOF FQH 2 EOF SYSTEM FLAG 

wr»0S oil 1 S PPBnPT FQM 3 OPERATION IGNORFD Fl AG 

01 IS * 

0-*0J 012* PRBOPC FQU 1 OPERATION COOE fPlGHT HLAF1 

0*0? ^121 PPSHRL FQH 2 DATA RFCrtRn LENGTH 

012? "ft******************************************************** 

0123 * 

0124 * POT 

0125 * 

012« •♦♦♦•♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦•♦•♦♦•♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦ ############## 

0*01 0127 PPTFLG EQM 1 FLAG WfiRp 

0128 * 

0»0F (312C OTRCTP F.QH IB PIRETT PUNCH RTT 

013C # 

001? 0131 OUTCNT FQU IS 

001? 0132 TEMP FQII 18 

&<M3 0133 TEHPi FQ|i 1Q 

0*1* 0134 VfCT EQU 20 WRITE VECTOR USED ON INTERRUPT ENT 

0133 ft********************************************************** 

0136 # 

0137 * WRITE COMMANDS FOR PTP INTERFACE 
013S * 

013C ********##*******#«*#*#*#*#**#*##*#*#*#**#*** # ## # * ######### 

0?00 014(T WCDI3C EQU >02<»G DISCONNECT DEVICE 

010P 0141 WCENlN EQU >01PJ0 FNABLE INTERRUPTS 

014? ******************#*#*****###****♦#*#•*♦##**♦♦#♦#♦**♦**♦♦♦# 

0143 * 

0144 * CONTROL FOR E^FEOR SUBROUTINE 
014? * 

01 4f ft********************************************************** 

0007 0147 WTEOE EQU 7 



OUTPUT COUNT USE" RY UTILITIES 
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Table D-5. Paper Tape Punch DSR Listing (Continued) 



SAP 32LC 

PTP 0*R • IMTIAL ENTRY 



SHEET P)«B5 



fl*0« 



PM4S 
014© 



WTEOR 



EOli 
WED 



PTP DSR - INITIAL ENTRY 
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Table D-5. Paper Tape Punch DSR Listing (Continued] 



SAP R?i_C 

PTP ^SP - I* ITIal E*TPY 



*HFET 000* 









15* 








« 1 5 1 * 








015? * 








0153 * 








0154 # 








0155 # 








«15f; * 






0000 


0157 I 




0000 


C650 


0156 




e*<M 


7400 
0000 


0159 


X 


0«a? 


0000 




p 


0*03 


0*63 


0169: 


p 


0004 


002* 


0161 




0005 


1*00 


016? 




000* 


0100 






0CT137 


C7C7 


0163 




003* 


3*13 


0164 




000Q 


C7C7 


0165 




00dA 


3013 


0166 




1000* 


6P13 


0167 




0o»eir: 


CO80 


0166 




0030 


7*10 


0169 




000P 


190! 


0170 




000F 


C927 


0171 


p 


0010 


002B 


017? 


p 


0011 


0«2B 


0173 


p 


0^1? 


004E 


0174 


p 


0013 


0066 


0175 


p 


0014 


002B 


0176 


p 


0015 


0026 


0177 


p 


0014 


0026 


0178 


p 


0017 


0026 


0179 


p 


001* 


004? 


0160 


p 


0019 


0026 


0181 


p 


0014 


6031 


016? 


p 


001« 


0031 


0163 


p 


001C 


0026 


0184 


p 


0010 


0024 


0185 


p 


001K 


0626 


0186 


p 


001P 


0026 


0187 


p 


0020 


0024 


0188 


p 


0021 


0024 


0169 


p 


0022 


0024 


0190 


p 


0023 


0040 


0191 
0192 



PFJ 

ft****************************************************** 

A, - HFTEPMINF TF LFGAL 0PC0DF,TA*E ERROR PATHF. IF NOT 

B. - BRANCH VTA BRANCH Ta*LF ACfORDTNG TO OPCODE 

♦ft***************************************************** 
ISPTP FQIJ $ 

RMO L,A SAVE SVC RETURN * 

•8PL ISD3RI INITIALIZE SUB PROGRAM 



INTERRUPT ENTRY ADORESS 
rANCFL ENTRY ADDRESS 
ENABLE INTERRUPT CONTROL 



OATA 


INTERP 


DATA 


CANCEL 


#LDM 


■wCENTfc 


IOCO» 


* 


I0BUS WRTTF.CNHD.M 


IOCOM 


TOBUS READ,C*MO,M 


CPA 


■ 19 


SGE 




BRU 


OPCOER 


LDX 


1*2, X 


RMO 


X,P 


DATA 


OPCOER 


DATA 


OPCOER 


OATA 


WTASCI 


OATA 


WTBINY 


OATA 


OPCOER 


OATA 


OPCOER 


OATA 


OPCOER 


OATA 


EXTEOR 


OATA 


LDRTRL 


OATA 


EXTEOR 


DATA 


CLSWEF 


OATA 


CL8WEP 


OATA 


EXTEOR 


OATA 


IGNOR 


DATA 


OPCOER 


DATA 


OPCOER 


OATA 


IGNOR 


OATA 


IGNOR 


OATA 


IGNOR 


DATA 


DIRECT 


HED 


PTP DSR 



READ ASCII 

1 READ BINARY 
? WRITE ASCII 

3 WRITE BINARY 

4 REWIND 

5 BACKSPACE RECORD 

6 FORWARD SPACE RECORD 

7 OPEN 
6 OPEN REWIND 

9 CLOSE 

10 CLOSE WRITE EOF 

11 WRITE EOF 

12 CHANGE RECORD LENGTH 

13 READ DEVICE STATUS 

14 BACK SPACE FILE 

15 FORWARD SPACE FILE 

16 UNLOAD 

17 UNA88I6NED 

18 UNA88IGNED 

19 WRITE DIRECT 
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Table D-5. Paper Tape Punch DSR Listing (Continued) 



SAP R2L.T 








PJP Q«j? 




0193 




PEJ 




0024 


0194 


IGNOR 


FOU S 


0^24 


C7C7 


0195 




I0C0M 


0025 


0903 


0196 




BIT SFT.PPB,PPBSF 




89*2?? 


hi n< 
b 1 jr / 


M 1 U M C 1 


e nt i m 

c. \»\ < m 




002? 


0198 


extfor 


FQtt $ 


6fl2fl 


CI^PIP" 


0195 




tLHA -FXTNRH 


P 0*27 


0!*75 








002* 


811* 


0?07 




STA VFCT.FR 


0029 


C7C7 


0201 




TOCOM 


0M2A 


4S0P 


0202 




EXIT FOP.f 




002* 


0203 


OPCnER 


FQtl $ 


8^2* 


0000 


0204 




• LOA «wcnisc 


U02C 


020P 








Jd£^2D 


C7C7 


0205 




TaroH 


B0 2F 


3M« 


020S 




T0BU8 WRTTF,rw«D f A 


ifltZf 


C7C7 


0207 




lorow 


tf(*,3a 


420Q 


0208 




FXTT ABOPT.OPOFPP 




0031 


020<? 


CLSwEF 


FOU $ 


««31 


1707 


02H?; 




LnX «WTFOF 


0032 


0*0P 


0211 




*l^E "LDPTPL 


P B»3S 


0*42 









SHEET 0007 



SET OprO^E IGNHR BIT 



FXTT ON rOMPLFTfnN OF REQUEST 



0121 



HEP PTP DSR « NPITF EHF/EOR 
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Table D-5. Paper Tape Punch DSR Listing (Continued) 



PTP t')S«i • WPITE EOF/E0* 



SHFET 0U0P 



0"i34 
IS "!3S 
0P3* 

0«38 

0[*39 
0H3A 
033R 
0&3C 
0t*3O 
0*3E 
033F 
0CMC* 
0«4l 



«P34 

0*39 
81 14 
911? 
0»39 
111? 
023F 
C7C7 
3809 
491? 
7838 
1113 
9114 
7833 



n?17, 
w?14 
0215 
a? IS 
3217 
*?18 
tt?l« 
022"! 
0221 
0222 
0223 
(9224 
0225 
022S 
0227 

«?28 
0229 
023r 
0231 
0232 
(9233 
0234 
0235 
023<5 
0237 
0238 
023C 
024ff 



PFJ 

* 

♦ INPUT TS E«NF*T FNTpV VECTOR AK'0X«? TF FOR 09 X«4 IF EHF 

* A. - SET VECTOR Tn TVPTP1 

* B, - T,ET CHARACTER 

# C, « TS IT LAST OME TO PU»JCH? ES THEN TO TO F 

# 0, •• OUTPUT CHAPACTFR 

* E. - EXIT NORMAI LV 

# F, - SET VECTOR AS SPFCTFTEO HN EMTRY 
* 

***♦**#**#*#*#****#********###****#*****************♦**** 
EOFFOR EQt! S 

STE TFMP1,BP 
#LOA "IVPTP1 

STA VECT.8R 
ST* TEMP, PR 
IVPTP! EOU $ 

ID* TEMP, PR 

LDA EOF.X 

I0C0M 

IOPUS WRITE, OATA.A 

OMT TEMP, BR 

BRU FXTNRM 

ldk TFMP1,B» 

STX VECT.BR 

BRU EXTNRM 

HRD PTP OvSR m PUNCH LEAOER/TRIILER ROUTINE 
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Table D-5. Paper Tape Punch DSR Listing (Continued) 



SAP R2|_C 

PTP !)SR . 



PI'NCM LF!*nEP/TRAILE» RHUTINF 



SHFET flPiflQ 





#34? 


C*4? 


i» ff $ P 


B'44J 


HP 47 


11 CM 4 


81 14 


19 'MS 


A76 4 


tfiMft 


8! 1? 




i*P47 


M47 


401? 


feHMP 


7*01 


^W4Q 


7«DC 


ifl«4A 


C7C7 


tiiMR 


3**1 


rfn4f 


7«2« 



B?41 PEJ 

7i9AT ****#*#**************#**#*****#****#*#*****#***#***** 

W?43 # 

tf?44 * A. * SET INTERRUPT VECTOR TO FNTE& AT R 

I1H Jf . Q _ nnkir TV I rlK « v u C e A uec f y L- LI ^ « V « * 

n f «~j w o t w i / u rv c if ini' i i n sS| tco iric,™ ■* u in r 

W?4£ * C, - PUNCH A BLANK 

fl?47 # 0. - FXTT NORMALLY 

0?48 ♦ E, - niSCONNECT 0FVTCF AND FXTT EHR 

Vi?4C * 

VI 9 5 ft ft**************************************************** 

8251 L^RTRL FQU S 

0?52 *L0A »TVPTP2 

*?53 »TA VFCT,«R 

tf?54 I.DA ■!(?« 

«?55 STA TFMPpSR 

tfPSfi IVPTP? FQII $ 

0?57 HMT TFMP.PR 

a?58 BRU $+2 

«?5Q PRl' CANCEI 

tt?6? Tf)C0 M 

rt?«1 TORUS *RTTF,ruTA,E 

tf?S7 «RI» FVTNRM 

fl?63 HFn PTP HSP - wrtTF ASCII 
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Table D-5. Paper Tape Punch DSR Listing (Continued) 



SAP H9|_r 

9TW osft m w^ITE ASCII 



*HFET flr*!* 



<M4n 

P MM4P 

0051 

to052 

M?*53 
0*54 
003* 
H{»5S 
P H«57 
0c*5« 

0!*59 

0<*5R 

0*5E 

003F 

0p«w 

P 0*61 
10 06 2 



HCT40 
5101 
0*4F 

0P52 
81 H 
8012 

HP'S? 

C7C7 

ft*0P 
DPI? 
7803 

HP0P 

8914 
PP50 
C7C7 
3800 
7«JP 

0101 

t)P0F 
7*C7 
0P5F 
1708 

0800 

0«2* 
78D1 



W264 
02*5 
•126* 
0267 
H263 
026S 

H271 
027? 
0273 
0274 
0275 
0976 
0277 
0278 

027Q 

028? 
0281 
W282 
0283 
0284 
0283 
H2Bff 

0287 
0288 
0285 
029^ 
0291 
0292 
0293 
0294 
0295 
0296 
0297 
0298 

0299 
0303! 



♦ft***************************************************** 
* 

* A. • SET VECTOR 

* B. - 7EPQ POT OUTPUT COUNT 

* C. - GET CHARACTER 

* 0, - IS IT LAST CMAPACTFP Tn WRITE ? Mn TWfM GO TO F 

* E, - SET VETTHR Tn TVPTP4 

* F, - EXIT NnPM AI L y 
* 

a****************************************************** 
DIRECT FQli S FNTRV FOP DIRECT PUNCH 

IMO P0TFLG.8R 8fT OIPECT BIT F« AC, 
WTA8CI EOM S 

#LOA «IVPTP3 

8TA VECT.PR 
STF 0HTCNT,PR 
IVPTP3 FQU $ 
TQCQM 

THAR GET, A 
TAPO 
BR!' COMT 
#l_r*e "TVPTP4 



8TF VFCT.PR 
CONT FQU S 

TOCOM 

T08U8 WRTTE.DATA.A 

PRIi EXTNRM 
IVPTP4 FQU % 

|_DA PnTFLG.PR 

TABZ DIRCTP 

8RIJ EXTFOR 
SETFOR FQU $ 

LDX «WTE0P 

• LDE -FXTEHR 



BRANCH IF DOING DIRECT PUNCH 



BRU EOFFOP 

HEO PTP DSP - INTERRUPT FNTR* 
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Table D-5. Paper Tape Punch DSR Listing (Continued) 



SAP H2LC 

PTP DSR m INTERRUPT ENTRY 



SHEET flflll 



fl3dl PEJ 

A3 01? ft***************************************************** 

USPS * 

£304 # A, - CLEAR INTERRUPT 

£505 * S, - BRANCH VTA VEctQr 

035?e * 

P307 ##*♦#+********#******##*#♦*♦***##+**#*********♦**#***+ 

flc*63 0305 INTERR EQU $ 
K«63 C?C7 0305 TOCO* 

W«64 3(Mt> »3i£ TORUS READ,C M Mn,.A 

^C6?S 701 ^ ASH PRII *VECT,B» 

«315 H£n PTP r>SR - wRTTF RJNARY 
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Table D-5. Paper Tape Punch DSR Listing (Continued) 



OTP flSH - W»ITfc pTNARY 



SHFFT 7*1? 



n " 6 fc 

t* t* 6 7 

V !* ft Q 

fcVft A 
W '* 6 W 

*?ftr 

n ii ft n 
/^ftF 

*"ftF 
(rf r «7 * 

ifi»7\ 

Mci 7 * 

tf<*74 



id0»7* 
tffl7* 

fe'A77 

B*;* 

P tfc*7 9 
k!l^7A 

tfl(*7P, 
k*n7P. 
4JW7H 
\6 r *7? 
fl * 7 P 

fc}*81 
k*f*8? 

W*83 
00*84 



C**ft^ 

W67 
C7C7 
•>«tfp 

DPMI 
7«F4 
81 13 
CA0M 

1* « tf ('' 

tic*77 
tf^fcF 
HQl 4 
3FtfF 

fl?WF 
C7C7 

3«frif» 
WC>7* 

yir*7«. 

C7C7 
43HP 
Crf*77 

CM IS 

0P67 
7*F4 

PP7A 
P>*FF 
tfPFP 
t*oiPF 
(X^FF 
8093 
fl^AA 
lrt*AF 
rt^l^ 

fl?83 



h 3 1 7* 
^314 

*3JG 
^31 T 
ti 3 1 3 

tf*21 
t*32? 

*32.J 
*32B 

t*327 
*323 
f'3?C 

to*3c: 
t*331 
W33? 
1*3 33 

tf334 

n33f 

H337 
^338 
/33 1 ? 
W34? 
ti341 
k13 4T 
H3 4 7. 
tf3 44 
H343 
rf34f, 
C*347 
1*348 
tf J4C 
6^35^ 

*35l 
41352 
0353 
U354 
U355 
»3SC 
?357 
<*S58 
t*35S 
0367 
0361 
*36£ 
H363 



PFJ 
a**************************************************** 
* 
♦A, - RFT CHARACTEB FROM SHFFFP 

* B, - ^AS PUFFFR ftFE*i FXMAHSTFn? YFS RH TO TVPTP4 

* C. - SAVE CMAWATTP« IV POT 

* 0, - ?FT VFTT^R TH TVPTP5 fMATFHFNT G1 

* E. - 3UTPMT PflJFfT THAR 

* F. - )XTT Nnp«'A| l, V 

* R. - RFT fcFVT 0»JFCT THAR FORM PDT 

* H. - SFT VFTTHR Tn TVPTP8 (STATFMF^T A} 

* I, - r,n rr f 
♦♦a************************************************** 

WTBT^Y FQH * 

STF nnTrMT f «R 

JVPTP* FQU 1 

Torn* 

THAR RFT,A 

TA»Z 1 

PRii SFTFOP 

STA TFMP1 ,RB 

CRA 4 

• LHF sTVPTPJS 

C0NT7 FQM * 

?TF VECT.BP 
and «>f 

<=MP A,X 
I DA TAB.X 

TornM 

TOPiJS ^RTTF,"ATA,A 
IVPTP FQII $ 
EXTK!RH fqn f 

Tnrrjw 

FXTT NHRN« f c» 
IVPTP5 FQH * 

LOA TFMPi,R» 

•LHE «TVPTP6 



EOF 



NULL 

xnFF 



TAB 



PRH 
FQU 
HAT A 
HATA 
HATA 



CHNT7 

S-l 
>FF 
► FF 



rtATA >FF 

DATA >93 

HATA >AA 

PATA >AF 

PATA >10 

PATA >t«l 

DATA >»2 

PATA >B3 



PPI.ETE 

y-PFF 

* 

/ 
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Table D-5. Paper Tape Punch DSR Listing (Continued) 



SAP H?Lf! 

9fP OStt • WPITE BINARY 



8HFET 0f»i S 



0K8* 


PM 


&*S«4 


tff*87 


Ht"15 


¥»3ft5 


0'*8fl 


»«M* 


fl366 


0fl*9 


P»P97 


PI367 


8^sa 


Hi»9P 


$368 


0*8* 


PP19 


18369 


0<*«r 


w«l* 


U37F 


tM8n 


MP9B 


0371 


(MBF 


«<mc 


M37f 


M8F 


»*9P 


*373 


»H9n 


6»P9F 


*37* 


0*91 


Hf*lP 


H37«5 




H^tf P 


?37f 



HATA 
OATA 
HATA 
HATA 
HAT A 
DATA 
DATA 
OATA 
DATA 
DATA 
HATA 
DATA 
FNH 



>04 
>\3 
>\G 
>97 
>98 
M9 
>1A 
>QB 
»1C 
>OD 
>Q€ 
>1F 
ISPTP 
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Table 


D-5. 


SAP *?LC. 






o j p •■) s hp - 


hPITE 


RTNA 


* 


(-' Cl t 




83 


1*0 1 




CLS^FP 


0P31 




DAT* 


ppflie* 




EnF 


0U7A 




EVTFHW 


0^2* 




INTFRR 


0P63 




ISPTP 


0fc*00 


P 


IVPTP3 


tff*52 




L 


W0W5 




M 


0P03 




OPfiFRK 


0P0g 




PnTFLG 


PIP 1 P» 1 




r Pff>inpr 


00*1 




KFAH 


000* 




SFTFDM 


005F 


R 


1 A3 


0P<82 




wroisr 


C5S?0»?I 




hTBTNV 


0066 




R JtnFF 


007F 





Paper Tape Punch DSR Listing (Continued) 



SMFFT ph 



A»0»T 


0*21 


P 


R 


000* 




BTT 


8«50« 


CANCEL 


0(?2* 




CWA» 


*M0« 


P 


CLFAR 


000W 


CMMn 


0*01 




cnviT 


^050 




CHNT7 


006F 


OTPCTP 


0?»0F 




DTPFCT 


0W4H 




F 


0001 


F0FF0P 


v9^34 




E^R 


0024 




EXIT 


810A 


F V T M P M 


0f*7* 




GET 


0^0R 




IGNOR 


0024 


mens 


84a* 




incnM 


C7C7 




ISHSRT 


0000 


IVPTP 


0(*75 




IVPTP1 


0030 




TVPTP2 


0047 


IVPTP4 


0C3C 




TVPTP* 


0*77 




IVPTP* 


0067 


Lr>«TRL 


004? 


R 


L*T 


0002 


P 


L^AD 


0ffl04 


NORH 


002* 


R 


NULL 


0<*7F 




OPCHFR 


002* 


O'lTCNT 


0*1? 




P 


0007 


P 


PHT 


0001 


PRB 


000* 


R 


PRRHRI 


0i*0? 


P 


PPRFOF 


0002 


PRBHPI 


a*03 




PRBSFL 


000P 


h 


PUT 


000A 


REG 


84A« 


R 


3 


0W04 




3FT 


0001 


SKIP0 


0002 


P 


SKIP1 


0003 


R 


STORE 


0005 


TEMP 


001? 




TFMP1 


0013 




VFCT 


0014 


WCENIM 


0100 




WRITE 


0007 




WTASCI 


004E 


WTEHF 


0007 




WTfftR 


0005 




X 


0002 



0045" FR°OPS 
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01/17/74 
CHART TITLE - DATA TERMINAL OSR - 980A 



AuTOFLCK CHART SET 



/ [CENT / 



32.16 >* 

I/O CALL ENTRY 



/ IGNOR / 



01.05* — >* 

IGNORE OPERATION 



/ 




1 


1 




1 


1 INITIALISE / 


/ INTERFACE 


1 
1 






05 


BRANCH 


IIS I 


NG 


OPCOOE 




ROASCI 




2.18 


OPCOER 




1.06 


MTASCI 




6.01 


OPCOER 




1.06 
1.06 


OPCOER 




OPCOER 




1.06 


OPCDER 




1.06 


OPEN 




2.06 


OPEN 




2.06 


CLOSE 
CLOSE 




1.09 




1.09 


MRTEOF 




1.10 


EXTEOR 




2.06 


ROSTAT 




2.09 


OPCOER 






OPCOER 




1.06 














ICNO* 




1.07 


IGNOR 




1.07 



01.03* — >* 

OPCODE ERROR 
* 
I 06 

* EXIT * 
EXIT WITH ABORT ERROR 



* EXIT » 
END OF RECORD 



/ CLOSE / 



01.05* — >* 
CLOSE I/O CALL 



01.05 > 



1 




H 


s 


ULISTI 


H 




FEED THREE 


H 


1 
11 


BLANK LINES 


H 
H 



*_EXIT * 

END OF RECORD 



/ ISINT / 



INTERRUPT ENTRY 



> nr ^ * YES 

►INTERRUPT 7* 



• » YFS 

WRITE * 

•INTERRUPT 7* 



REAO INTERRUPT 

* 
I 



FRAMING 
ERROR OR 

TIMING 
•ERROR? • 



EXTNRi 



(ICCHAftl H 
HECK SPECIAL H 
CHARACTERS H 



BRANCH VIA REAO VECTOR 



WRITE INTERRUPT 



EXIT 

NOUHJl 



BRANCH VIA WRITE VECTOR 



Figure D-9. Data Terminal DSR (Sheet 1 of 6) 
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01/17/7* 
CHART TITLE - OATA TERMINAL OSR - 9B0A 



AUTuFLrlw CHART SET 



• CANCEL CURE MUST 

• FOLLOW REAL 

• VECTOR BRANCH 



CANCEL l/Q ENTRY 









5 


IXL1STI 


H 


i 
1 


SEND CR/LF 


H 
H 
H 



/ OTWREP / 



OUTPUT XITH REPLY 



SET PRB BIAS TO 



03 


/ RUBOUT 


/ 




»->l 


17 


5 

1 
1 


(XLISTI 

SEND BAC 
ARROW, CR, 


LF 


H 

H 
H 



01.05 > 

READ ASCII ENTRY 



* EXIT * 

END OF RECORD 



/ OPEN / 



01.05* — > 



CLEAR LINE FEEO 
IGNORE FLAG 



1XLIST) H 
SEND CR/LF H 



. 1.01. 

... IOENT 
EXECUTE THE OUTPUT PRB 



03.27 > 

RNGBEL * 



SUPRESS BELL * 



ENO UF RECORD 



/ ROSTAT / 
01.05 > 



(SETWIG) 

SET WRITE 

IGNOR 



_EXIT 

NORMAL 



/ SETRIG / 



02.02* — >• 



END OF KECORO 



/ SETWIG / 



02.23* — >• 



Figure D-9. Data Terminal DSR (Sheet 2 of 6) 
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01/17/7* 
CHART TITLi - OATA TERMINAL DSR - 980A 



AUTUFLOW CHART SET 



/ TAKCHR / 



GOTOCR * 18 



BRANCH HERE ON 
BACKSPACE FROM 
KEYBOARD 





CHANGE SACK SP4CE | 
IU BACK SLASH | 




BSABLE '| 04 




4 

I 

* 


(KRTCHKI H 

SEND BACK H 

SPACE OR BACK H 

SLASH H 

1 03 


4 


DECREMENT INPUT | 
COUNT 1 



. 4.03. 

... EXTNH 
EXIT OSR 



BACK SPACE ? 







* rss 


RUB OUT 


? *-* 












* 








* 






NU 


'. 17 '. 
RUBOUT 


,. 


12 








* 




« YES 


LINE FEEL 


7 * 



(PUT) H 

STORE H 

CHARACTER IN H 

BUFFER H 



YES . 4 . 
. 01 . 

CK8UFF 



1 


NOCRLF 1 20 


2 

2 
5 


H 

ISETRIGt H 

IGNORE FURTHER H 

INPUT H 

H 



*«AS BUFFER 


* Yt 


* ALREADY FULI 




» 7 


















NO 


. 4 

. 08 

EXTNR 
17 


DECREMENT INPUT 1 


COUNT 


1 



-03.17»— 
CHKEOF 



. 08 . 
ExfEOR 



» IS INPUT 
* COUNT .GE. 
* 7 

* 

* * 
* 
YES 


* NO 
2 »-♦ 

.* I 
1 

.""2* 

. 08 






EXTEOR 


SET PRB 
END-OF-FILE 


23 

= LAG 1 



. 2.08. 

... EXTEOR 
EXIT OSR 



BRANCH HERE ON 
LINE-FEED FROM 
KEYBOARD 



I ZERO OUTPUT COUNT 



CHECK FOR END-OF-FILE 



. 2.20. 

... RNGBEL 
ACCEPT FURTHER INPUT 



Figure D-9. Data Terminal DSR (Sheet 3 of 6 



D-45 



Digital Systems Division 




943005-9701 



01/17/7* 
L.HAKT TITLE - DATA TERMINAL OS* - 9B0A 



AUTOFLOW CHART SFT - 



/ CKSUFF / 
03. 15 > 



rES 'WAS BUFeER • 
« ALREADY FULL 



04.09— 
CHKLF3 * 03 



FEED BEFORE 

• ECHO FLAG » 

* SET ? * 



(XMTCHRI H 

SEND LINE FEED H 

TO PRINTER H 



(SETwIGI 

SET miTE 

IGNOR 



(K»TCrlR! 
cCHO INPUT 
CHARACTER 



-Ol.ltJ* — > 

FXTNFM I 3 



EXIT 

NOkMAL 



(SNDCHR) H 

ECHO THE INPUT H 

CHARACTER H 



. 3.21. 

... CHKEOF 
CHECK. FOR ENO-OF-FILE 



/ SNDCHR / 



0*. 11* — >» 

SEND ONE CHARACTER. 
RETURN WHEN COMPLETE 



SET KRITE VECTOR 

TO RETURN TO 

CALLER ON NEXT 

WRITE INTERRUPT 



(WRTCHRI 
OUTPUT THE 
CHARACTER 



. 4.08. 

... EXTNRH 
EXIT DSR 



/ WRTCHR / 



02.21*-- >» 



Figure D-9. Data Terminal DSR (Sheet 4 of 6) 
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01/17/?* 
CHART TITLE - DAT* TERMINAL DSR - 980A 



AUTOFLOW CHART SET 



/ XHTCHR / 

04.05* — >» 
SEND ONE CHARACTER 



/ LSTLIN / 



03.26* — >* 



CONVERT SPECIAL 
CHARACTERS TO 
EQUIVALENT STRINGS 



RETURN WHEN COMPLETE 
I 0! 



(GETI 
GET A 

CHARACTER 



* RETURN ? 



* FORM FEED ? *- 



. 12 . 

SNDCHR 



NO *IS HONE ON * 

« FORM FEED BIT 

* SET ? « 



NOHCME I 7 

'. 5. Ill 

... XLIST 

SEND THE STRING 



NO *IS ONE NULL* 

* AFTER CR BIT * 

* SET ? * 



— 01.10* — > 
SEND CHARACTER STRING 



ENO OF LIST 7 * 



(SNDCHR) 
OUTPUT THE 
CHARACTER 



DO NEXT CHARACTER 



* IS LINE » 
FEED IGNOSE 

• BIT ON ? « 



. S.ll. 

... XL 1 ST 

SEND THE STRING 



RtTJRN TO CALLEk 



-* BUFFER EMPTY * 



CHARACTER 

•BETWEEN >10* 

*ANO >14* 



(XHTCHR I 

SEND THE 

CHARACTER 



* IS OUTPUT * 
COUNT . E9. 

* CARRIAGE * 
♦SIZE 7 * 



(XMTCHRI H 

SEND CARRIAGE H 

RETURN H 



•IS NO LF ON* YES 
* CARRIAGE SIZE *-♦ 
* BIT SET 7 * I 



SEND LINE FEED H 



1 I 



. 5.19. 

... LSLOOP 
DO NEXT CHARACTER 



Figure D-9. Data Terminal DSR (Sheet 5 of 6) 
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01/17/7* 
CHART TITLE - DATA TERMINAL OSR 



.UTUFLOW CHART SET 



/ KTASCI / 

01.03 >* 

URITE ASCII ENTRY 



/ FORMAT / 

06.06 >* 

FORMATTED OUTPUT 



I ZERO OUTPUT COUNT I 



NOTE: A SECOND CALL 
Tj (LSTLINI rtILL «E 

NJP 



• rfAS THIS A 
OUTPUT WITH 



SET PRB BIAS Tr 



FORMATTING WORD 



s 


(XMTC 


HRI 




SEND 


:r 




1 







FORM FEED ? 





H 


s 


IXMTCHRI H 




iENO SECUND LF H 


il 


H 


I 


H 



IBCK ARR.CR.LF) I 
BACK ARROW 
(CRt LF) 



CLEAR EOL 

* 

(FORM FEEOI 



(3 LINE FEEDS) 



(CR M/ 5 NULLS) 



!(CR W/ 1 NULL) 
CR 
NULL 



(HOME CURSOR) 

HOME 

CLR EOL 



Figure D-9. Data Terminal DSR (Sheet 6 of 6) 



D-48 



Digital Systems Division 




943005-9701 



Table D-6. Data Terminal DSR Listing 



SAP «2LC 

q R 0A DATA TFRMJNAL DEVICE SERVICE ROUTINE 

0001 ,#CREATE TDDT, SAP, 'DATA TERMINAL DSR». 



SHEET 0001 



0^02 




«<*05 




0"|04 


* 


0005 


* 


0006 


* 


0007 


* 


0008 


'• # 


0^05 


* 


0010 


* 


0*11 


* 


0*12 


* 


0013 


* 


0014 


* 


«<*15 


* 


09116 


* 


0017 


* 


0<M8 


* 


0019 


* 


0020 


* 


0021 


* 


0022 


♦ 


aaat 

fc . - ■ a, v 


a 


0024 


* 


0025 


* 


0026 





IDT IDDT 

HED 980A DATA TERMINAL DEVICE SE&VICE ROUTINE 

TITLEsTDDT • 580 A DATA TERMINAL DSR 

AUTHDRbWAVME DOHNAL 

REVISIDNS«WD REVISIONS 

COMPUTER«980A,SAP 

* ABSTRACT- THIS IS THE DEVICE SERVICE ROUTINE PROVIDING 
THE NECESSARY INTERFACE BETWE N THE DATA 
TERMINALS TIED TO COMMUNICATION MODULE 
AND THE 0*980 SYSTEM. 

DETAILED OPERATIONAL DOCUMENTATION is SEPARATE 

STATISTICS«THE MAXIMUM PATH WITH INTERRUPTS MASKED IS 

????? US. PLUS TIME FOR THE FOLLOWING UTILITY 
FUNCTIONS! 



HED DATA TEPMTNAL DSR * GENERAL EQUATES 



D-49 



Digital Systems Division 




943005-9701 



Table D-6. Data Terminal DSR Listing (Continued) 



SAP S2LC 

DATA T(FPMTNAL DSR - GENFRal EPUATFS 



SHEET 0002 



0tf01 
0000 
0001 
0«00 
0002 
0002 
000 3 

0004 
0005 

0*0* 
0007 
0^00 

000A 
000* 

0020 

002* 
0021 



£1*27 
0*28 
0*25 
003? 
0031 
003? 
0033 
0034 
0035 

0*37 
003» 
0039 
004ff 
01*41 
0042 
9P43 
0^44 
0045 
004^ 
0047 
004ft 
0043 
0050 
0051 
0052 
0055 
0054 
0055 
005C 
0057 
005S 
005C 
0060 
0061 
0062 
0063 
0064 
0065 
006? 



PEJ 



ft********************************************************** 

* 

* EXTERNAL REFFRENCES ANO PFTIMITIONS 

a********************************************************** 

* 

REF ISDSRT 

HFF ISDT ENTRY POINT 

REF ITCHAP CONTROL CHARACTER ROUTINE 



T/D UTILTTV FQUATES 
ft********************************************************* 



IOCOM npn >C7C7,5 

BIT FRM 5.2,5,4 

SFT FQU 1 

CLEAR FQU 

PnT FQU 1 

PRB FQU 

LOT FQU 2 

SKIP0 FQU 2 

3*XPi FQU 3 

REG FRM 5,3,2,6 

LOAO FQU 4 

STORE FQU 5 

IOBUS FRM 5,7,4 

RFAH FQU 6 

WRITE FQU 7 

DATA FQU 

CHAR FRM 5,H 

PUT FQU >A 

GET EQU >R 

EXIT FRM 7,9 

NORM FQU >20 

EOR FQU >24 

ABORT FQU >21 
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Table D-6. Data Terminal DSR Listing (Continued) 



SAP R2LC 

DATA TgRWTNAL DSR 



GENERAL EQUATES 



SHFET 0P03 





«pi«7 




B068 




v3^6C 




0«7E 




tf&71 




0-«72 




0*73 


H £ P! 


0W74 


0P01 


0075 


0i*0l 


0*76 


fl^fl? 


09(77 


0*03 


0078 




C*(*7Q 




caaSP 




0f*81 




0082 




0«es 




PI3R4 




0C*85 


pi^yi? 


M«»C 


000? 


0(^87 


F<*H1 


0088 


000? 


0t»8*? 


0»03 


«W90! 


PC04 


0<*91 


jAf*03 


05*9? 




flWQS 



PEJ 



-♦♦♦♦♦•♦♦A******************** 



*************** ***************' 

* 

* PRB WQRD EQUATES 

* 

*********************************************************** 

* 

PRBSFL FQU 

PR8UFL FQU 1 

PRBOPC FQU 1 

PPBHRL FQU 2 

PRBOSA FQU 3 



PRR SYSTEM SET FLAGS 
USER SET FLAGS 

T/n opcode (RIGHT half} 

DATA RECDRD LENGTH 
riATA RFCHRH LENGTH 



♦a********************************************************* 

* 

* PRP FLAG BIT EQUATES 

♦♦♦♦♦♦A**************************************************** 



PRBFOF FQU 2 

PRBOPT FQU 3 

PRBOWP FQU i 

PRBATM FQH 2 

PPBFAC FQU 3 

PRBSCR FQU A 

PPBSBL FQU 3 
* 



FNn nF FTLF 
OPERATION T&nORED 
PUT PUT "TTh REPLY 
AUTO RECORD TERMINATE 
FORMATTED ASCII OUTPUT 
SUPPRESS AUTO CR-LF ON INPUT 
SURP»ESS BELL ON INPUT 
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Table D-6. Data Terminal DSR Listing (Continued) 



SAP R?LC 

ruTA TERMINAL DSR • GFNFRAL EQUATES 



SHEET flf*04 



F&»>fl1 

hi* IB 
f*Pl* 

HP 17 

t- * 1 <? 



0P0* 
C*C*Pl7 
0*0F 



0094 

i/!tf9^ 
HP OK 
tfi*97 

00 98 
009'? 
010? 
«l 01 

01 tf£ 
010 3 
0104 
010f 
HI aft 

Ml 07 

mas 
tf1 wc 
m 1? 
01 1 1 
01 1? 
0117, 
0JK 
01 1^ 
011ft 
01 17 
01 18 
01 15 
HI 2* 

0121 
(912? 
13125 
0124 
012ft 
0125 
0127 
0128 



**** 

* 
**** 

PDTF 
POTP 
PPiTn 
pnTn 
POT M 
POTS 
pnT» 
pnT*! 

TFMP 
TEMP 
TFMP 
POTn 

**** 

* 
**** 

pnTR 
pnTi. 
pnTL 
PDTF 

PPT1 
POTB 
pnTL 
PDTL 
PDTn 



PEJ 
♦♦it**************************************************** 

PDT WORD E^UATFS 

************************************************ 



*****+*< 



RR 
8A 
CT 

xn 
TA 
VC 

vr 
l 

2 

EV 



FOU 
PR" 
F 01 1 

FOU 
FQii 
FQli 
EQU 
FQH 
FQ" 
FQli 
EQU 
FfDH 



1 

IS 
lfi 
IB 

2* 
21 
2? 
23 
24 
2* 
2« 
27 



FLAGS 

PRR ADDRESS 

nATA BUFFER ADR 

output COU*'T 

20 HAX CHARACTER OUTPUT/RECORD 

TNTTIAl ^TAT"S 

REAP VFCTOR 

WRITE VECTOR 

TEMPORARY STORAGF 

TE M PnRARV STPRAGF 

TEMPORARY STORAGF 

DEVICE DFSCRTPTiriN 



******* 

POT FL 

******* 

SV EQU 

FF EQU 

FT FQH 

FH EQU 

NL FOU 

C* EQU 

FA FQM 

FR FOU 

MR FOU 



************************************************ 
AG BIT E^ilJATFS 
************************************************ 




2 
3 
4 

s 

6 
7 

14 

1* 



DEVICE BUSY 

LF BFFDRE ECHO AFTER BS BJT 

T6K0RE NEXT LINE FFEO PIT 

MO M E ON FORM FEED BIT 

ONE NULL AFTER CP BIT 

PACK SPACAPLF PRINT MEAD RTT 

AUTO LF PN CARRIAGE SIZE BIT 

LINE FEED BEFORE ECHO AIT 

OUTPUT WITH REPLY IN PROGRESS 
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Table D-6. Data Terminal DSR Listing (Continued) 



SAP «?LC 

ruTA TermTNAL DSR 



GENERAL EQUATES 



SHFET 0(*F5 





0125 




PFJ 






013? 


*********************************** * * **************** 




0131 


* 








fisi 3£"- 


* R 


E^tSTFR EQUATES 




0137- 


* 








fill 3*' 


*************************** ************************** 




2135 


* 






aw 


013* 


A 


FQU 


OS 


«<*G1 


«S 37 


E 


FQU 


1 


«^0P 


Pi'! 3 8 


y 


EQU 


2 


fc55»0? 


9135 


M 


FQU 


3 


F**0!* 


M14P 


L 


FQU 


5 


000* 


0! 41 


R 


FQU 


6 


tff>*tf7 


9114? 


P 


EQU 


7 


01*81 


1 4 7, 

0144 


* 


FQU 


1 




Ml 45 


***************************************************** 




et i 4f 


* 








0147 


* CHARACTER EQUATES 




0148 


* 








014C 


***************************************************** 




015? 


* 






0HMF 


«1 91 


CLR 


FQU 


>1F 


t*C»lA 


a 15? 


CilRiiP 


FQU 


>ia cursor up 


»P0» 


Ml 53 


NULL 


FQU 


>0 


0*0? 


0154 


HOME 


FQU 


>? 


0*07 


0155 


BFLL 


FQU 


>07 


0P0P 


0155 


RAKSP 


FQU 


>0B 


ffc*0A 


0157 


LF 


FQU 


>PA 


0p0t 


0? 5a 


FF 


P Qi.l 


>r 


0war 


0150 


r.R 


EQU 


>0D 


01*11* 


0I6P 


OLE 


FQU 


>10 


0P14 


0161 


DC4 


FQU 


>14 


0P17 


0162 


CLRLIM 


FQU 


>17 CLEAR 1 IKiE 


05*3* 


0153 


RncnN 


FQU 


>3A 


005C 


01«4 


8KSLSH 


FQU 


>5C 


005F 


01fi5 


BCKARR 


FQU 


>5F 


007F 


0165 


UllBHT 


EQU 


>7F 


pit* 6Q 


0167 


TAB 


FQU 


>F9 


AFAA 


0168 


EMOFIL 


FQU 


>AFAA 
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Table D-6. Data Terminal DSR Listing (Continued) 



SAP R?L,r 

TATA terminal dsr 



• gfnpral equates 



SHEET 0.90t4 





01ft«5 




017^ 




CM 71 




i/»17? 




0173 




CM74 




8175 


tf^ar 


017C 


0f*0P 


ifll 77 


\X l* F 


^178 


(*P0F 


H17C 


PV» F 


01 «t ? 




Ml 81 




Ml*»e 




01*3 




01H4 




lM8» 




vll HC 




01*7 


0*0J 


LM8S 


p^flQ 


01 gC 




01 Qf 




0101 



pej 
♦♦♦♦♦♦♦♦a******************************************** 

* 

* nijTPHT FORMAT rOMTwOI FLAG BTT EOUATFS 

* 

POSFRM FQM J? FORMAT AFTER REGARD 

CBFORM Fflli 1? CARRIAGE RFTHRM 

LFFORH FOH J 4 LIME FEE n 

FFFnR" Ffjn 15 FOPM FFEP 

LF2FRM Ffjn 15 ?*P LI^'E FFFP 

* 

* 

* HTWFP FQUATES 
* 

a**************************************************** 
* 

LHTHPC EQii 3 

ILLHpn FQM 9 TUFGAl fiPFRATTHN 

* 

Mpn 04TA TF^MTNAL HSR * I/O CALL ENTRY 
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Table D-6. Data Terminal DSR Listing (Continued) 



SAP R2L 


r. 










0A?A te 


» M I N A L 


DSR - 


I/O CALI FNTRY 










tfl9£ 


PEJ 










»*»? 


0193 


TSHT FQli 


* 






!M fl 


CS50-. 


01.94. 


PMn 


L,A 






0M1 


747IR 


01.95 


#8PL 


ISDSR! 




X 


0C02 


oa&Qip 










p 


0f*rt* 


0*31 


wise 


HATA 


ISIMT 




p 


to*fl4 


MP4P 


•3197 


DATA 


ISPST 






^^^•S 


7"7? 


*198 


PHI 


SETHIS 






$[*$$ 


7f»74 


CM 9*5 


PtfL 


SFT*ir, 








0?07 


id? 91 P" 


IOEnT FQIi 


$ 






0i*07 


C7C7 


0901 


mean 






fc«flrt 


2*01 


0202 


»EC 


LOAD, a. 


PRH 




fc»^^Q 


3FFF 


0903 


ANH 


m>Ff 






0'4«AA 


C*0? 


32 « 4 


pmo 


A t X 






0i*0B 


fiFl? 


09B» 


CP* 


■ 18 






nwcir 


cnsc* 


020* 


SGF 








0c*fln 


7*18 


fe>Pe»7 


PH»I 


opc^er 






V5W«F 


0115 


020 8 


LOA PHTSTA.PR 






0iv!F 


C7C7 


«?^^ 


TOCOM 






fc v* 1 * 


3 pup 


021? 


TOP-US WPITF, 


PAT 




fl 1 1 


0201 


pi? 11 


LDA 


S*2,X 






»«M2 


CS«7 


021? 


pmo 


A,P 




p 


^9 1 3 


0£»69 


0213 


OAT A 


ROASCT 




p 


pa I 4 


i*i*2* 


0214 


HATA 


OPC^EP 




p 


0*lS 


013* 


P»P1 5 


DATA 


WTASCT 




p 


tf'-M* 


tffl2* 


0216 


HATA 


OPCHER 




p 


0/17 


002* 


0217 


DATA 


OPC^EP 




p 


&»6* X fl 


««2^ 


0218 


HATA 


OPCOEP 




p 


8CM9 


fe5**2^ 


0215 


PATA 


OPC'^EP 




p 


«pi *. 


P051 


022^ 


nATA 


DPEW 




p 


KJCI ^ 


an 51 


0221 


HATA 


OPE* 




p 


«}31C 


P02P 


0222 


P-ATA 


CLOSE 




p 


00m 


pi*2b 


0?23 


OATA 


CLOSE 




p 


031F 


pp>2r. 


0224 


DATA 


WPTEOF 




p 


0P»1F 


0P55 


0225 


DATA 


EXTEOR 




p 


(tf«2« 


0163 


*22« 


DATA 


PnSTAT 




p 


*fl021 


0028 


0227 


DATA 


opcder 




p 


0<*22 


PC'28 


0228 


DATA 


fiPcnEP 




p 


a«2S 


002? 


0225 


HATA 


TGNHR 




p 


«l«24 


\A'*2 P 


0239" 


DATA 


IGNOR 




p 


002* 


0?28 


0231 


nATA 


IGNHR 





SHFET 0007 



SAVF SVC RFT"RM • 
TNTTTALI7F SUB PROGRAM 



INTERRUPT ENTRY 

RESET ENTRY 
TNITTAI..I7C RFAD VECTOR TO TGWOP 
TMTTTALI7E WRITF VECTOR TO IGKfiRF 

STARTING POINT FOR I/O CALLS 

gft i/n rpenne 
.PRPOPC 



( egai. nprnoF ? 

WO, FATAL ERROR 
GET TNTTTAl STATUS 

TKTTTALI7F INTERFACE 
A, A 



BRANCH VIA TABI E 


«?fl 


READ A$riT 


01 


RFAD BINARY 


02 


WRITE ASCII 


03 


WRITE 8TNARY 


ot4 


RFWTNP 


05 


BACK SPACE RECORD 


26 


FnRWARO SPACE RFCORH 


07 


OPEN 


8»e 


OPEN REWIND 


CTQ 


CLOSE 


10 


CLOSE WRITE ENO*nF-FlLE 


11 


WRITE END OF FILE 


12 


CHANGF RECORD LFNGTH 


13 


READ DEVICE STATUS 


14 


BACK SPADF FILE 


15 


FDRWARO SRACE FILF 


16 


UNLOAD 


17 




18 
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Table D-6. Data Terminal DSR Listing (Continued] 



SAP «?IC 

mTA TEWMTNAl D*R - T/0 C ALI 



FMTHV 



SHEET flt>P* 



tf s»2* 
to 12 7 

0*2* 
ft f 2 o 

(MS? A 

*ii*2p 

«?2F 

v*r»2F 
tf "4 3 c* 



vs c* 2 f 
C7C7 
4?*0 
tf*2 B 
C7C7 

7*2* 

n i» 2 E 

7«2* 

Hfi2P 

v,\ C° 
7420 
7«24 



*?3£ 

0234 
H?35 
tf?3^ 
f*237 
W233 
H23C 
^94^ 
«?41 
/94T 
&i9 4?, 
W?4< 

0?4» 

*j24G 

d?47 

(*?4a 



PEJ 
HPC^E» FOM * FATAL ERROR ENTRY 

mrot" FATAL FRPOP 

EXIT APO^T^LLnPn 
IGNH« FOH $ 

IDCQ* SET PRP 16*0*6 FLAG 

BIT SFT,PE ? B,P C >8*FI ,PR«rPl 

PRH PXTFO» 
CLOSE ^ Qt » f 

SEV X CLOSE WRTTF FOE ? 

PWI' EVTFnP NT 

WPTFQF F(j|i $ 



• LHA si F3L«T 



YES, SEN" 3 line FFE^S 



PRL 

HRM 



* X X L T S T 
EXTFO& 



HFH DATA TERMINAL. HSR - INTERRUPT ENTRY POINT 
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Table D- 6. Data Terminal DSR Listing (Continued) 



sap «?tr 

OaTa TEPMTNAL OSR 



• INTERRUPT emt»y point 



SHEET PPP9 







64249 




PEJ 








B»31 


S»J»5P! 


ISIMT 


PQH 


s 


INTERRUPT ENTRY POINT 


H"31 


1701 


tf?51 




i.oy 


■ 1 


INITIALIZE TO CLEAR INTERRUPT 


B f *3? 


C7C7 


a?5? 




1 r * 


i 


ff [ a !J i r J i rjrwijr i 1 9 il a 


0*33 


3^8? 


0253 




TOP J 5 


! RE*D,DATA f » 




ft) a 3 ^ 


dp^o 


K?5< 




TARZ 


ffl 


RFAD INTERRUPT t 


id'M's 


7 «W A 


tf?5> 




PRO 


RniMT 


VIS 


P'*3* 


DRB1 


Pi?5C 




TAPZ 


I 


WRTTF INTERRUPT f 


HtM7 


7*04 


P257 




WRI! 


WRTINT 


YES 


tt'*3* 


CA4? 


«?58 




r r^ 


3 


ASSUME STATUS CHANGE INTFRRUPT 


tf<<39 


C7C7 


M25C 




mro* 


* 




M34. 


3M? 


426? 




TnPiij 


1 w«TTF,nATA,x 




tfujp 


7*6* 


&?61 




pru 


E*T^R M 






cimst 


i/i?6? 


WPTTNT 


fou 


* 




»«3C 


CA4< 


W263 




r»x 


4 


CLEAR '•iRTTE INTERRUPT 


»n3n 


C7C7 


0264 




TOCO* 


< 




U«3F 


3*tf9 


H265 




T0PU5 


J wRTTF,^ATA,y 




HHJF 


7^17 


KlPftfJ 




PRU 


♦POTWVtf R» 


BRANCH VTA WRITE VECTOR 




IA74P 


M267 


RntwT 


FQH 


$ 




tf <M'< 


CA41 


026S 




CR* 


1 


CLEAR »EAO INTERRUPT 


J*^41. 


C7C7 


tf?60 




IOCO* 




■ ^ M 


>■ » n ft 


il A « M 




TnalM 


i i,iUfre Ntri w 




ri> *< 


O" w * 


m* f v 




i i_i r- 1 1 .- 


7 r>r«i ir j ' ' m ■ •» | •» 




0A4S 


ORBS 


K271 




TAPZ 


3 


TFST FRAMING ERRnR 


^ it 4^ 


7*5P 


H27? 




«RII 


EXTMRm 




Mil 4 5 


DR&4 


PI27S 




TAPZ 


4 


TEST TTMTNfi ERROR 


0i*4« 


7*5P 


W274 




PRI> 


EVTNR* 




fid 4 7 


3F7F 


H?7-J 




ANT 


■ >7F 


MARK STATUS PITS 


004* 


7 Ayv 


i*27C 




♦ P,fc|_ 


xrcHAP 


CHECK SPECIAL CHARACTERS 


tf ' * 4 Q 


tA^M? 












lotl 4 A 


7Hlf 


U277 

■a?7* 


* 


RRII 


♦ POTRVCPP 


MO, PRANCH TO RfAR VECTOR 






K27C 




HFn 


DATA TF»MTNAL 


nsR m open anh dpen rpninh 
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Table D-6. Data Terminal DSR Listing (Continued) 



Sap "*?Lr 



- OPEm AN' 1 * HPFN RFWTNn 



SHFET PKMC* 



M4P 
fcfi w 4 n 

kJH4F 
0H4F 



(9051 
(0W5? 

0*34 
UM3* 



P W$7 
P UW30 



i* '/ 4 P 
702T 

74&H 
C7C7 

7«PI4 

flf>51 
C7C7 

P38J 

74B4 

pic*53 
C7C7 
4P0t> 



man 



K281 
*98? 
K?83 

tf?87 
a?88 
a?8C 

0?9t 
099? 
0993 
0?94 
0993 
099C 
PIP97 
0398 
P?9Q 

030J 
0303 
0304 
0305 
0*06 



PFJ 

* NHTRj TSRST MUST F0LL n W •**!. TCCMAR ft RRU *PDTRVC,PP 

TSRST FOf $ CAMCFL I/O FMTRY 

RRI SFTWI^ 5FT READ VFCTOR TO IGNORF 

LDA XXftKAR 

PR! *XXLI8T SfMO CR/I.F 

TOCO* riFAR II^F FFED TGWORF PTT 

PIT C! £AR,pnT,PnTnFV f PDTLPT 

BRtl EXTFOP FXTT THE HSR 



* 
OPEN 



incOM CLFAR IRNORF LTNF PEFD FLAT, 

PIT CI EAR,pr>7.PnTr>EV,PDTLFI 
IDA XXCRLF 

8END CR/I.F 



HSR ENn-OF-RECIRn extt 



RRU *VXLIST 
EXTFOR FOU $ 
TtlCOM 
FXTT EDR.t* 

* 



XXCRLF DATA XCRLF 

XXBKAR DATA XRC*AR 

XXLIST DATA XLI8T 

HEH DATA TERMTNAL D8R • READ A8CIT 
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Table D-6. Data Terminal DSR Listing (Continued) 



SAP *7lt 

QAT4 TERMINAL DSR 



- REAO ASCII 



SHEET flfM 1 



*M5A 

0«5« 
£ r '5C 
»H5n 
tf'^F 

»n5F 

P "! 5 1 
BUS? 

ft » ft * 

i»«67 
fc'«S9 

fej rf 6 E 

8fl«F 
P f* 7 1 ." 
tfi*7l 
fe * 7 ? 

tf '1 7 3 
tft*74 
tf''75 
0M7* 
* <» 7 7 



»l*7« 
M'*7A 



«9"7r 

« ^ 7 n 



l*P5A 
C7C7 
121F 
7«piF 
C7C7 
HA1P 

C"<*3 
C53P 

81 y«r 

C7C7 
2SM3 
81 17 

7 P A** 

0*67 
{*C»Fi* 
74FP 
ttt>69 
C7C7 
1^1 1 
7«FF 

C7C7 
290? 
0t>6F 
C7C7 
I'M? 
7»fl? 
0707 
7f*79 
H773 
£* C* A P 

M6P 
Ml* 
7 P fl 4 
7»2A 

l*t*7P 
1PI05 
91 1* 
C*57 



t/»c*7R 

81 17 
C*57 



P w*C»7F l^PA? 



K307 
P3flS 
01351 <3 
ASIC 
0311 
*31S 
1*313 
P>M4 
65315 

33 ie 

«317 

03 ic 

P»32P 
P>*21 
#32? 
0323 
d324 
*>325 
tf32f, 
H327 
*132 8 
032? 
U33«r 
H331 
033? 
(3333 
ir»334 
B335 
«33c: 

01337 
H338 
tf33C 
034? 

0341 
034? 

3 43 
0344 
0345 
034f; 
0347 
034S 
034C 
'135K 
Cl35t 
035? 
0353 
0354 

0355 

^357 



PEJ 
C1TWPEP tOU S 

TOrQM SEP TF ALREAOY THROUGH LOOP 

PIT SKlP0,POT,POTFLG,PDTnwR 

pen nnTwp YES S GET T W E REPLY 

I0C0M wp p SET OUTPUT WITH REPLY WIT 

SIT SFTpPnT.PHTFlG.PDTOwR 

LDA «4 SET VP PPB BIAS 

CHGTBL FQI' $ SET UP NEW PRB AND OB APRS 

RAO A,M SET UP NEW PPB AOHRESS 

RMf M,A 

STA POTPRP,RR SAVE In POT 

IOCO* GET NEW DATA BUFFER ADDRESS 

PEG LOAH, a, PRP,PRPnRA 

STA POTnPA.PR SAVE IN PDT 

RRH lOE^T 
RUBOUT FQII $ FNTEP WE«E IF RUROUT INPUT 

IDA XXB*AP 

PRI. *yyi,IST SEND BACK ARROW, C*. l.F 

RfUSCT Ff3H * 

TOCOM niiTPPT WTTW REPLY ? 

BIT SKlP?,PRR,PPBUFt ,PRPOwR 

RRII OTWREP YES 

OOlNP FQU $ 

TOCO* 7EP0 INPUT RFCORO LENGTH 

REG STO«E.E#P e B.P p BnRL 
RNGPEL FQU $ 

TOXOM SUPRFSS PELL ? 

PIT SKIPP!,PPB,PPBHF{ ,PRPSPL 

PRi' OONTRf; 

IDA «RELL 

»RI WPTCHR 



nnrtTRr; f qh f 

#t.O A sT A K CHR 

STA PPTRVf.np 

PPL SFT-'Tft 

«RU EVTuRk 

* 

SFTRir, FQU s 

Lny XFXNRV 

sty pnT^vr^R 

rmo tiP 

# 

* 

SFT'^IG Foil * 

I f)A XFyNRM 

STA pnTwvc,w» 

PMH l.,P 



YE« 

uiRTTF THE CHARACTER 

SET HP RFAO VECTOR 

TO ACCEPT NEXT CHARACTER 



SET »EAD VFCTOR 

TO K,NORF FURTHER CHARACTERS 



SET w«?jTF VECTOR 

TO IGNORE FURTHER INTERRUPTS 



XEXMRM HATA EW'RH 

HEn n.T. nSR-C M A»ACTFR TNTFRPUPT INPUT , CONTIKJUFO 
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Table D-6. Data Terminal DSR Listing (Continued) 



SAP ri?lC 








O.T. n * 


^-CHARACTER 


INTERRUPT INPUT , rfiMTT 






^35S 


PFJ 






H £• 7 F 


^35? 


CLRSCP PQi' 


* 


0t*7F 


7 r *sr 


036? 


r<Rl 


WRTCHtf 


0tf dr* 


C7C7 


0361 


IOCO' 


M 


H d 1 


HP1F 


036? 


«IT 


CI EAR.pnr, 


M 8 !? 


7*E* 


tf363 


pru 


RDASCT 




8 3 


0364 


TAKCH1 FQH 


* 


1(3 »83 


*F7F 


036": 


CP* 


■RUPOT 


0[*84 


COA0 


0S6C 


$MF 




a^ »i"S 


7»E1 


0367 


PR l.i 


RnpnuT 


u ^a* 


OP5* 


0368 


SARO 


8 


0*87 


C7C7 


0369 


toco* 


0f*8* 


ft<*00 


037? 


CHAR 


PUT, A 


01*89 


f>789 


0371 


rp|. 


■ TAP 


viCTa a 


CH2? 


037? 


SEP 




0CT8P 


7807 


0373 


pru 


CKRIIFF 


ta^«r 


DR01 


037* 


TABZ 


1 


0^80 


7«14 


0375 


PRU 


EVTNRm 


0<*8F 


C7B* 


037* 


re* 


M, B 


008F 


490? 


0377 


omt 


PPB»RL,PR 


iamg^ 


780P> 


0378 


PRU 


S«M 


009t 


C78* 


0375 


REX 


M P B 


0<*92 


781C 


038ff 


RRll 


CHKFOF 




0t»93 


0381 


CKBl'FF FQU 


S 


0093 


D*ai 


038? 


TABZ 


1 


0094 


7800 


0383 


PR II 


EXTnrm 


&jc*95 


QP00 


0384 


TAPZ 





0(196 


7«ar 


0385 


PRU 


FULLBF 




0097 


038C 


CHKLFP EQU * 


1 


00)97 


C7C7 


0387 


IOCO' 


* 


0098 


IMF 


0388 


PIT 


SKlPl,pnT, 


0*99 


7*9l7 


0389 


PRO 


8EN0CH 


009A 


81 18 


0397. 


8TA 


TEMPI ,BR 


0A9P 


C7C7 


0391 


IOCOM 


0*9C 


0?1F 


039? 


PIT 


CLEAR, POT, 


0^90 


070A 


0393 


LOA 


■ LF 


r *9F 


7*5? 


039< 


PRL 


XMTCHR 


0f»9P 


7<*DP 


0395 


PRL 


SETmr, 


0«A'» 


mi* 


039fi 


LOA 


TFMP1,BR 



TTMnEn 



PHFET 0*1? 



PoTFL6.PPTl.F8 



RU« HUT ? 

YES 

PET M$P Of CHARACTER TO 1 

8THPF IN USER'S PIJFFFR 

TAP ? 

KiO 

WAS PUFFER ALREAOY FULL ? 
YES, DON'T 00 ANYTHING 
WO, POINT BASE TO PRB 
REDUCE CHARACTER COUNT BY 1 
NECESSARY NOP IN CASF OF SKIP 
RESTORE BASF TO PDT 
CHFCK FQP FNO»OF«FILF 

U-AS PUFFFR ALREAHY FULL ? 
YES, DON'T 00 ANYTHING 
010 WE JUST FILL BUFFER ? 
YES, SEE IF AUTO TERMINATE 

SEE IF LF BEFORE ECHO 

POTFLG.PDTLFB 

MO, ECHO THE CHARACTER 
SAVE THE ECHO CHARACTER 
CLFAR LF BEFORE ECHO FLAG 

POTFl.G,PDTLFB 

SEND THE LF 

SET WRTTF VFCTOR TO IGNORE 

RESTORE THE ECHO CHARACTER 
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Table D-6. Data Terminal DSR Listing (Continued) 



SAP R?LT 

0,T, ns»«r.HARACTER INTERRUPT INPUT 



tf^Ai 



U3A? 
«HA3 

*5* A* 
a<*A«S 
IMA« 
05t AT 

td*A» 
rA AQ 



0flAA 

j5 f^ j^ r$ 

«0MC 
kJP*n 
flWAF 

VMAF 
tti*34 

*a a* 

MHO 

?WHA 



*HA1 
7<*4A 

3*A2 
PPA? 
HPA? 
C7C7 
4 ««t? 
jar* A 4 

C7C7 
HI? 
7*FP 

7*3F 
7*05 



F&AA 
t^AC 
C7C7 

7P5H 
7^C° 

tf H A F 

AFAA 

cr>2F 

7«A1 

C7C7 

2 en? 
«F«1 
Cnpip 
7«90 
C7C7 
?»«? 
7«9P 



0397 
i»39B 
A39C 
M43P! 
tf4(M 
H40£ 
0403 
0404 
0405 
040<5 
0407 
0408 
0405 
V»41« 
V$4H 
041S 
0413 
0414 
91415 
041C 
51417 
PM ! ■ 
M41Q 
042* 
0421 
042? 

U423 

04?4 
0425 
M2« 
*427 
04?8 
042c 

043? 
0431 

«4 3? 
043?, 



PEJ 
SENHCH EQU $ 

PRL WRTCHP 



CONTINUED SHEET 0013 



ECHO CHARACTFR TO TERMINAL 



NORMAL 09R EXIT 



IVRnT FQU $ 
EXTnRm ERU S 

TOCQm 

EXIT NnRM.pi 
FULLBF EQU $ COME HERE IF BUFFER JUST FULL 

TOCOM AUTO.TFRMINATE T 

PIT S*IPJ ,PR8,P08UFL.PRRATM 

PRU CMKLF» NO 

PRL SF.T»ir, niSCARO FURTHER CHARACTERS 

PRL SNDCHP FCHO THE CHARACTER 

PRU CHKEOF CHEC* FOR END«»nF»PXLE 



* 
* 
* 
GOTHCR EQU $ 

If) A XXC*LF 

TOCnv SUPRFSS CR/LF ECHO ? 

RTT Kit TP1 . PPB .PBRMPI .PPRSfB 



ENTER were ON CR INPUT 



PRL XLIST 

PPL SFTRIG 

CHKFOF EOl' S 

LOA *PDTDRA f B& 

• CPA •ENr'JFTL 



SEND CP/LF 

TGNORE FURTHFR INPUT 

I OOK AT FIRST WORD IN BUFFER 
ENn»nF»FTLF ? 



WO, FXTT DSR 

LOOK AT TNPUT COUNT 



*E0 

PRU E*TEOP 

IOrDM 

REG LOAD, A, PRP.PRBQRL 

CPA «1 TS IT AT LEAST 2 7 

SLT 

PRM EVTFO& wO, FXTT DSR 

TOTO* YES, SET EOF FLAG TN PRB 

PIT SFT»PPB,PPBSFI .PRBEHF 

PRU EXTEOP F*TT DSR 
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Table D-6. Data Terminal DSR Listing (Continued) 



SAP w?lc 

0,T t ns c -rHARACTCrr interrupt input 



roMTTNHE^ 



SHEET Pi<M4 



tf;*Cl 
w « C ? 
tt t*C J 

*lnC* 

u*c* 

tf'*c* 
tfuCQ 

*mcc 

tff'CF 
H w P 
0'*O1 

rt rJl •") ^ 
I0«i)4 
tf M *> 

dor)* 6 
id? 07 
tf i.» a 
/ H)^ 

/ ;i « 

a;'uc 

rt'*i)F 
tt.i ,)F 



«v* E l 
/«E? 

id :i E J 
tfc*E 4 

tf ■* E ^ 



^i'8r 

C7C7 

cr*i 

7PE? 

C.7C7 
1*8* 
H75f 
7r»24 
7?B* 
C7C7 

?1lrf? 

C711 
T7C7 
2^0? 
C7C7 
IBB? 
7*fl!> 
C7C7 
M A 1 F 

cr«i 
7«ni 

C7C7 
1»84 
7«CF 

[MJH 

3«rt" 
l^FF 
2FHJ 

n7«/ 
S«»P 

crt»i 

7«C4 
7»C1 



fl4c*F 

W * 5 R 
7*?P 

HOI 9 

7"3? 

C7C7 
M?1F 
7*8* 



0434 
H4 35 
tf43f 
0437 

U43S 

M4? 
14441 
W44? 

0443 
M444 
IA4AZ 
1*4 46 
14447 
044$ 
5i44^ 
v14Sf 
3451 

#45? 

(14 57, 
H454 
^45? 

V14S7 

&45S 

M6* 
MM 

M6? 

IA4S3 

U46F, 
M4b£ 

H467 
^468 
04SS 
tf 4 7 S 
C 471 
(fl47? 
rt47J 
H474 

1/1475 

Pi4 7^ 
^477 

M47S 
M7C 
i/i4gr 

W148 1 
PI4R2 



PEJ 
RAC*SP FOU $ FfcTE* HERE TF BACKSPACE INPUT 

TOCO* LOOK AT TNPUT COUNT 

SET, LOA*,F,PR»,PRBOPL 

SN? & TS IT ZERO ? 

RRii EXTMRM yes, EXIT OS* 

TOCO* T8 PRI*JTFR BACK SPACABLE ? 

PIT S*IPt ,P*T,POTr>EV, PPTBCK 

LOA «BKSL*H WO, MS* PACK SLASH INSTEAD 

RRL SNHCHP SEND 8AC« SPACE OR SLASH 

PRL SET*IO 

IDCO M I. P"K AT INPUT COUNT 

PEG LOAD, F,PRB,PRRDPl 

PDF E,E OECREMENT CHARACTER COUNT 

1000" PUT BACK IN PRP, 

PEC, STGRF^E.PCB.PRBnRL 

TOCOM SEE IF LE AFTER BS 

PIT SKIP1 ,pnT,PnT»>EV,PnTLFE 

rrii BACKS1 nnNi'T SET LF BEFORE ECHO BIT 

TOCO* SET LF BECORF ECHO BIT 

PIT SFT.PrT.pnTFLG.PDTLFB 
BACK Si FOU S 

SN7 E 

BRU FyTNRM 

TOCOM CRT? 

BIT SKIP1 f pnT,P^TOEV,,P0TFFH 

BR|! EXT*JRH *'D 

IDA POTOEV,°R 

#AM^ »>FF M ASK hTOTM 

SUB 8 >3 
STA $*3 
I DA mv 



SZF 

BRU 
LOA 
MRU 



F 
EVTHRH 

■ riJPUP 

SFNOC* 



* 

LTNFE^ PfJM 
•LOA 

BR| 
STF 

PRL 
TOCOH 



vxbk*r 

XL I ST 
pr»T"CT,«» 
LSTI I VJ 



FNTEP HERE IF LF INPUT 



SEND BACK ARROW, CP, LF 
7F»0 miTPIJT COUNT 
I 1ST TME IKiPllT RECORD 
CLFAP LF BEFORE FCHO BIT 



BTT CLEARjPriT.PnTFtr^PDTL^B 

BRU RNG«EI ACCEPT FURTHER INPUT 



meo DATA TEOMTMAL HSR - CHARACTER TRANSMISSION 
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Table D-6. Data Terminal DSR Listing (Continued) 



SAP I 


S?LC 




oaTa 


TERMINAL DSR 






0484 






0485 






0486 






0487 






0488 






0489 






049C 






0491 




0C*E8 


0492 


»£"E* 


C551 


0493 


tfflEO 


8017 


0494 


8«E* 


7«fl1 


0495 


0^gp 


788* 


049ff 
0497 
0498 
M9S 

050? 
050J 

0503 




piffEf 


0504 



CHARACTER TRANSMISSION 



SHEET 0015 



«i n C i. jr/r ininr/ 

0«eo Q051 050* 

0"EF 07C7 0507 

fe«gF 38fi»0 0508 

B0F0 C*57 0505 



REJ 

* 

* SUBROUTINE TO SFNn nNF CHARACTER FRnH THE A*RFCiT$Tg R. 

* RETURN TS WHEN CHARACTER TRANSMISSION IS COMPLETED. 

• 

SMOCHR FOH $ 

RHO L,E 

STF PnT^VC,»R SAVE RETURN TN WRITE VECTOR 

RRI WRTCH» OUTPUT THE fHATACTER 

RRU EXTMRf- FXTTO^R 

* 

ft******************************************************** 
* 

* SHBROl'TTNF TO SFNH HNF CHARACTER FROM T«E A-RFGTSTER. 

* RETURN TS IMMFOTATE. 
* 

WRTCHR FQIj $ 

« m 1 .• m-m f r 

SA*Q 1 

TOCO M 

TORUS WRITE, HATA.A 

RMO L,P PETURW 



SET INTERFACE TRANSMIT BIT 
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Table D-6. Data Terminal DSR Listing (Continued) 



SAP rf?tr 

n A T A Tp«?MTNAL 



f)SR . CMABATTFR TR AN$M I *S TON 



SHFET fl<M* 



0^F? 
0JFJ 
l^*F4 
0^F* 

A*¥y 

Zi*Fn 

it i F n 

0.*F« 

*nFF 

0101 
01fl5» 
«ld3 

01 04 
01H* 

1 * n 

p 0107 

010« 
W10Q 

01 * A 

H10P 

010P 
01 vjn 

W1SIF 

01HF 
011* 
KM! 

k» 1 i? 

0113 

01 Id 
01 1* 
01 1* 



rtr*FJ 
3F7F 

«>F^r 

C^AP 
7*11 

«F0A 

r. p a t 

7R0O 

ftF^ir 
7«eu 

0f"i^C 

01C* 
C7C7 
13B4 
2?14 
7P0A 
lM W1 

01 IP 
DP0i3 
7* IP 
w ? 3 4 
7*05 
*11 0^ 

1*100 
C7C7 
l^B? 
2707 
010P 
81 115 
C*51 
BOIA 
010F 
051Q 
OP01 
7P1* 
S1 IP 
7PD* 
7«F* 
HI Id 
0*43 
81 IP 
C*57 



ill ^ 1^ 

0M1. 
051? 
5 1 3 

0514 

0M5 

f /Blf. 
0517 
0515 
0515 
ft 5 2? 
0*21 
052? 
0523 

0525 
052* 
0527 
0525 
0*2Q 
053P" 

vi«3 1 

*53? 
0533 

tf534 

053f 
0537 
0539 

0533 
054^ 
0541 
054? 

0543 
0*44 
0543 
PI54C; 
0547 
0548 
054C 
055? 
0551 
055? 
0553 
0554 
0*55 
055* 
0557 
0558 
055$ 
056? 



PEJ 



* 

* SUBROUTINE TO SFKi* SINGLE CHARACTERS. USAGF TS STMU.AR 

* Tn SNOCHR, EXCEPT S p ErI*L CHARACTERS ARF CONVERTEO TP 

* THE MFCF$5A»Y CHARACTER STRINGS, MAY ALSO PE ENTFPEO AT 

* XLIST TO SEND A PRE-SPEPIF IEO STRING. 
* 

♦****#♦*#*#***#***#+*♦*+*************+******************** 
XMTTHP 'FQH S 



CARRIAGE RETURN ? 



AMP 


■ >7F 


CP* 


■ PR 


SNF 




PRU 


XCR 


CPA 


■ LF 


SNF 




PRU 


XI F 


CPA 


»FF 


SEP 




PRU 


snochr 



• LPA «FFLST 



TOCO" 



LINE FFEP 1 

YES 

FORM FFEP ? 

WO, JUST TRANSMIT AS IS 



SEE IF HPMF ON FORM FEFP 



»IT SKIP0,P r »T,PPTPEV,PDTFFH 



XLF 



xcr 



ADP «HMLST-FFLST 

RRU XLIST 

FQP % 

LOA PPT^Ev/.PR 

TAPZ POTLFT 

PRU SKPLF 

IDA XI FIST 

PRII XLIST 

FfJI' S 

•LPA "CR1LST 



TorrjM 



CHANGE CHARACTER LIST APR 
5fwo FPRH FFFP EOUTVALFNT 



SEE TF LF IGNORE BTT SFT 

IGNORE LINE FEED 

SEND LINE FEFO EQUIVALENT 



SFF TF OK'E NULL AFTER CR 



XLIST 



PIT 
ADD 
FOU 
STA 
RMP 
STF 
LSTL.UP FfJU 
L f) A 



8KIP0 f pnT,PPTPEV l PDTlN'L 

■CR2LST-CRH ST 

% 



TFMP?,po 

L,E 

TFMP3,RR 

% 

*TEMP? # PR 

TAPZ 1 

PRU #TE M P3,«R 

IMP TEMP2 f B» 

PRI S^nCHR 

PRU LSTLUP 

SKPLF FQU S 

SAPZ POTLFT 

STA PPTOEV.BR 

RMO L#P 



SEND THE CWARACTITR LTST 
SAVE LTST TNOEX 

PETUPN APR 

GET A CHARACTER 

END OF LTST ? 

YES, RETURN 

MO, INCREMENT TNOEX 

ANP SE*'0 THE CHARACTER 

PO NEXT CHARACTER 

RESET LF IGNORE BIT 
RETURN 
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Table D-6. Data Terminal DSR Listing (Continued) 



SAP R?LC 










DATA TERMINAL 


DSR - 


CHARACTER TRANSMI8ST0 1 






K561 




PFJ 






0117 


0562 


L8Tl„IM 


EOU 


1 


0117 


C55t' 


0563 




RMn 


L,A 


ai i a 


gi i a 


0564 




ST A ' 


rFMPl .PR 


01 19 


C7C7 


0565 




TOCO! 


* 


01 t A 


5*0P 


056f, 




. CHAR 


GET, A 


*1 IP 


DP01 


0567 




TAPZ 


I 


»i ir 


7H1P 


0568 




PRM 


*TE"*P1 ,"R 


1 1 


3F7F 


058Q 




ANO 


«>7F 


01 IF 


6Flf 


57? 




CPA 


» > 1 i* 


01 IF 


cncf 


571 




SLF 




012* 


7A0IV 


057? 




HRU 


CHARpK 


e» 1 a 1 


5EJ4 


^573 




CPA 


■ >i 4 


H1 29 


Cfiflfl 


0574 




SLT 




0123 


070? 


8575 




i pa 


■ NULL 




fit 2* 


H57C 


CMAR0« 


FOh 


* 


^124 . 


70CC 


0577 




PRL 


XMTCHP 


0125 


C7C7 


0678 




TOCO" 


* 


012* 


1«1_3 


0*75 




PIT 


SKIPJ ,PR8 


0127 


7«F1 


fl58? 




PRU 


L8TL I* + ? 


012« 


at IP 


v*581 




I DA 


PnTnEV,«9 


012<> 


0R43 


058? 




SAPZ 


PDTLFT 


(?12A 


81 IP 


0583 




9TA 


PnT.nfv.RR 


vi12P 


3FFF 


0584 




*Nn 


■ »EE 


012C 


501? 


0585 




CPA 


PnTfiCT,«R 


tf 1 2^ 


C12C" 


058H 




«Efi 




012^ 


7SEA 


05S7 




PRU 


LSTLP-f? 


&12F 


070n 


05*8 




IDA 


■ CR 


0i;v» 


7 c C ? 


058<3 




PRI 


XMTCHR 


?U! 


«4'*07 


0599! 




IDA 


XLFLST 


013? 


C7C7 


591. 




tocom 


013* 


13R7 


059? 




PIT 


vSKIP0,PnT 


tf 1 34 


270 J 


0593 




adp 


■ 1 


0135 


7*05 


0594 




PRI. 


XL I ST 


013* 


C7C7 


0595 




TOCO' 


M 


v>137 


0«8? 


059f 




HIT 


SET, PUT, P 


01.3* 


7«F.^ 


0597 
0599 
059C 


* 
* 


PRU 


LSTI.In*? 


p ei3« 


/ic? 


060(7 

0501 


Xl.Fl.ST 

• 


nATA 


LFLST 






050? 




wen 


DAT* Tf9M 



SHEET 0017 



LIST USER BUFFER ON TERMINAL 

SAVE RETURN 
RET A CHARACTER 

PUFFFR E^PTV ? 
YES, EXIT ROUTINE 

TF THE CHARACTER 18 TN THE 
RANGE OF >10 TH >14 
CHANGE IT TO A NULL 



■NO. SEND THE CHARACTER 
SEE TE FORMATTED OUTPUT 
pPRBUEL » PRPFAC 

LOOK AT DEVICE DESCRIPTION 
CLEAR THF LE IGNORE FLAG 

CHECK CARRIAGE SIZE 

EQUAL TO OUTPUT COUNT ? 



kjO 



SEND CARPIAGF RETURN 

POTNT TO LINE EEEO LIST 

Oin DEVICE DO TT8 OWN LF ? 
.PnTDEV.PDTLFA 

SEND LE OR LE/CLP EOL 
SET THE LF IGNORE FLAG 
nTDEV.PDTLFI 

GO 00 MORE 



TNAL DSR ^ WRITE ASCII 
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Table D-6. Data Terminal DSR Listing (Continued) 



SAP *?LC 




OAlA te* 


-HTN*t 


dsr . 




CM 3 A 


0604 


»t.1A 


»<?i? 


0*05 


Wl 3« 


C7C7 


B«»C 


0130 


1M* 


0*07 


ki 1 3n 


7*?* 


0*05 


viljp 


S1 1? 


0*0$ 


01 3F 


St 1? 


0*ir 


»1 4C» 


i*MP 


0611 


^t 41 


np?ir 


0612 


0t4P 


7" , 04 


0*13 


01 43 


7*07 


0*14 




01 44 


9*15 


0144 


7*02 


061f 


PI 4* 


0101 


0*17 


M1 4* 


OP IF 


0*18 


0147 


7*21 


0«lC 


014* 


07FC 


0*2? 


0149 


7C00 


0*21 


P 014A 


0f*6P 


0*22 
0*23 



- HQITfc ASCTI 

PF.J 
WTA5CT FQU 1 

stf pnrncT.op 
loro* 



PIT 

PRii 
jmo 

JMO 
IDA 
TAPZ 
PRL 
*RL 
SWOLI*' FQU 
BRL 
IDA 



SKIP1,P«B,PPBI»FI 

SNDLIV 

PPTncT, »P 

PDTOCT,PR 

♦POTPHA.BP 

POSFRM 

L8TLI* 
FORMAT 
S 

LSTLIN 
„.,- PnTFLfi.BR 
tapo potowr 

BRU FXFORX 
LOA «»4 

• BRU CHGTBL 



SHF£T PP1R 



7FPO OUTPUT rOUNT 
FORMATTED OUTPUT ? 
,PRPFAC 
MO FORMATTING 
INCREMENT PAST FORMAT WORT 

LOOK AT FORMATTING WORD 

POST FORMATTING 1 
YES, LIST THE RECORD 
00 FORMATTING 

DUMMY CALL IF ALREADY DONE 

LOOK AT POT FLAGS 

WAS TMT8 AM OUTPUT WITH REPLY 

MO, wg APE FINISHED 

RESTORE ORIGINAL PRB AOR 

»ESET ORB ANO OB ADR8 



HfO OATA TERMINAL DSR * FORMATTED OUTPUT / READ STA 
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Table D-6. Data Terminal DSR Listing (Continued) 



SAP R5>LC 
ruTA TERMINAL 



BM4P 

l a i A m 

f ' 1 •» I . 

IM4D 
tf 14F 
^1 4F 
IMS* 
0151 

«M5? 
«M5S 
P154 
ltH5S 
015* 
U157 

015* 
HI 50 

ttl 5A 

015«* 

e 1 5 r 

015n 
r15F 
W15F 

tfl«<* 
Ml 61 
tf 1*? 



01 63 
IM64 
0185 
^ 1 «F 
1*167 
016» 

016A 



01 4P 
C*5P 
811* 
B51F 

dp in 

7*fe!5> 

PI70D 
7!>9F 

Pi 15? 

051C* 
DP0E 
7P03 

7*#9 
70JP 
01 5P 
P7PIA 
70*97 

dpjf 

7H1P 
H70A 
7?9? 
7P1P 
71 6P 
t*7flr 
7&8F 
7ni* 



«16? 
C7C7 

3Ppt* 

3fi£P 

C7C7 
2*0? 
016Q 
C7C7 

4R0<* 



DSR « 

01*24 
0*2S 
0*2fl 

0*25 
ci*3ff 
0*31 
0*32 
0*33 
0*34 
063S 
0*3« 
0*37 
0*33 
0*35 

05*40 
0*41 
0*4? 
H*43 
tf«44 
0*45 
l?t*4£ 
0*47 
0*411 

a*4S 
0*5e 
0*51 

a*sr 

0*53 
0*54 
0*55 

a*se 

0*57 

0*5£ 
0*60 
0*61 
0*62 
0*63 
0*64 
0665 



FORMATTED OUTPUT / PfAD STATUS 



SHFET 0<MQ 



NOC» 



PEJ 
FORMAT FQH 
RMD 
STA 
I D A 
TAP! 
PRU 
LOA 
PRl 
FQU 
LOA 
TAP 
RRl 1 
TAP 

P f% i i 

BRH 

FQU 

LOA 

*RL 

K DA 

TAP 

RRU 

LDA 

PRI 

PRU 

FHU 

I DA 

RRl 

PRU 



FMTLF 



FMTFF 



L,A 

TCM| 

*PDTDPA,BR 
D CRFHRM 

NOCff 

«CR 

XMTCHR 

S 

♦PDTDPA,B» 
Z LFFDRM 

FMTLF 
Z FFFORM 

♦TEMPI ,PR 
$ 

«LF 

XMTTHP 
♦PDTOPA.pP 
LF2FR" 
♦TEMPI .PR 
«LF 

XMTCHP 
♦TEMPI, »R 
* 

■ FF 

XMTCHR 
♦TEMPI ,PR 



♦ 

RnSTAT FQU 
lor 
TOP 

• AW 



QM 

US READ»DATA # A 

D ■ >6(MF 



SAVE RETURN 

LOOK AT FORMAT wrjRH 

CARRIAGE RFTURm ? 

WO 

YES 

YES, SFNIH TT OUT 

LOOK AT FORMAT WDRD AGAIN 

I INF. FFF.D J 

VES 

FORM FPEn ? 

VES 

NOTHING AT ALL, RETURN 

SEND HI LIWF FEED 

WO 

SEND TMg LINF FEFO 

LOHK AT THE FORMAT WORD 

SECOND LtNF FEED ? 

NO. RETURN TO CALLER 

YES 

YES, SFNO TT OUT 

THEN RETURN 



SEND THE FORM FEED 



Pfc'AD INTERFACE STATUS WORD 



IQCQ* RETUPN IN PRB 

»ET, STQPE, A,P«B,PRPDRL 
EYEHRy EQU S» 
TOrOM 
FXTT EOR.a 

MED DATA TERMINAL DSR m CMASACTER INTERRUPT INPUT 
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Table D-6. Data Terminal DSR Listing (Continued) 



Sap *?ir. 

DATA TewmTKal HSR - CHARACTER IMTFR<*IJPT inPiiT 



SHEET BIP»20» 



P 

P 
P 
P 
P 
P 
P 
P 
P 
P 
P 
P 
P 

P 

P 
P 
P 
P 
P 
P 
P 
P 
P 
P 
P 
P 
P 
P 
P 
P 
P 
P 



a«fte; pej 

M6 B tf*67 TAKCHP p.Qii 

*»o 6F20 «*68 CPA 

*>C. CH4P a*ft<3 SGT 

$> 7C4T (?*7cr rrii 

«F C*0? 0*71 pmh 

6F l?m tfffj? ldx 

7* C*27 0«73 PMH 

71 Pi?A? 0*74 XFXTNR r>A T A 

7? 0f'A? 0*75 *ATA 

75 H?A? 0*76 HATA 

74 POA? 0677 DATA 

7«J (rfy A? fl*7« PATA 

7* 0PA2 0«75 DATA 

77 tf*A? 088" 1 DATA 

7ft 0*A? 0*81 DATA 

7^ 0PRC 0*8? DATA 

7A 0*83 0*83 DATA 

7« 019* 0*84 DATA 

7C 0*A2 0*8"; OATA 

7H pwA? 0*86 HATA 

7F PifflAA 0*87 TATA 

7F p'Jtgp ®*qg HATA 

80 0PA2 0685 HATA 

HI 0^1*2 0*95? DATA 

82 00A2 0*91 TATA 

83 00A2 0*92 OATA 

84 00A2 0*97, DATA 
8* 00A2 0694 DATA 
8* P0A2 0895 HATA 

87 00A2 069« PATA 

88 0UA2 0897 DATA 
80 00A2 0898 HATA 
8A 0PA2 089C DATA 
8* 01AP 07005 DATA 
8C 0*A2 0701 DATA 
80 0191 0702 DATA 
8E 00A2 0703 DATA 
8E 00A2 0704 DATA 
9* 007E 0705 DATA 

0191 0706 RTGARR EOU 

'1 CB0P 0707 RMO 

99 C7C7 0708 TOCO* 

93 2002 0709 PES 

94 C300 071P RIN 
9* 7808 07H RRII 

019* 0712 DWNARR EQll 

9* C502 0715 RMD 

97 C7C7 0714 IQCOM 
9" 8102 071S REG 
99 0U8 07 1C LOA 
9* 380P 07 } 7 fAKl0 

98 00PP 



$ 
«>? ' 

#XTAKPH 
A, X 
S*2,¥ 
X,P 
EvtmRm 

FVTMRM 
EYTMRM 
EVTNRM 

EXTERN 
EXTWRM 
EYT*'R« 
EXTNRM 

BACKSP 
TAKCH1 
DWNARR 
EYTMRM 
EYTHRM 
GHTncR 
LTNFED 
EXTNR* 
EXTMRM 
EXTNRm 
EXTnrm 
EVTNRM 
EXTNRM 
EXTNRM 
EXTNRM 
EXTNR* 
EXTNRH 

EXTNRM 

UPARRn 

EXTNRM 

RIGARP 

EXTNRM 

EXTNRM 

CLR8CR 

S 

A#X 





01 

P2 

!*3 
"»4 
05 
06 
*7 
08 
09 
PA 
0R 
*C 
00 
■E 
0F 
10 
11 
12 
13 
14 
13 
16 
17 
IS 
19 
1A 
18 
1C 

tn 
if 
if 



NMLL 

HDME CURSOR 



BELL 

BACKSPACE OR CURSOR LEFT 

HORIZONTAL TAR 

LINE PEED OR CURSOR DOWN 

FORM FEED 
CARRIAGE RETURN 
LT8T INPUT LI^E 

OLE 

PRINT 

DC4 



CLEAR END OP LINE 

CURSOR UP 
CURSOR RIGHT 

CLEAR SCREEN 



LOAD, A.PRR.PRRORL 

A, A 

DWNAR1 

S 

A#X 



LOAD.E.RRR 
RDTOEV.RR 
■ *EP 



,RRBORL 

MASK NIOTH 
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Table D-6. Data Terminal DSR Listing (Continued) 



SAP *2LC 

DATA TERMINAL DSR 



019C 

!M9F 
6) 1 9 F 
01A0 
I01A1 

&u? 

01 AS 
01A4 

eiA? 

01 A* 
01A7 
01 AP 

01 AO 
P 01 AA 

01 AH 
01 AT 
tf! AP 
01 AE 
HlAF 
& 19« 
vi 181 
01(3? 
0183 

U184 

mas 
ip! aft 

0187 

0inp 

0189 

018A 
P 018P 



2F0? 
C«90 
019F 
C7C7 
1P84 

7CD0 

C7C7 

2183 

C41? 

CP4F 
7T.CP 
01 kf 
C7C7 
2P0? 
C«52P 
7C0f* 
BPA1 
01 AP 
C7C7 
1P84 
7CC3 
C7C7 
2102 

01 IP 

3*0t* 

2*0? 

7CBA 
C"01 

cm<" 

171 A 
7«E* 

fci*83 



0718 
0715 
072K 
0721 
(1727 
0723 
0724 
0725 
072* 
0727 
0728 
0725 
073fr 
0731 
073? 
0737, 

0734 
0735 

«73ff 
0737 
0738 
0735 
074F 
0741 

074!? 
0743 
fd744, 
0745 
074f. 
H747 
i^ 7 4 8 
0745 
W750 
0751 



CWARACTFR IMTFRPUPT INPUT 

SU« «>2 

PAD E,A 
0WNAR1 EQU $ 

TOCOH CRT? 

PIT SKIPl f pnT,Pr>TnEV,POTFFN 

prii ♦*em>R 
incoH 

RET, LOAH, E»UnT,LOTQPC 

RCA E,A 
SGT 

PRii **FVT M R 

DWNAR2 EQU $ 
TOCOM 

REG STORE, A,PR§,PRBr»RL 

PMf! *.A 

#8RU SFNHC^ 

UPARRH FOU * 

TfirOM CRT? 

PIT SKlPi,pnT,PnTnEV t POTFFM 

PRII *yRXTWR WO 

IOCOM 

REP LnAO,F,PRP,PRPnRl 

IDA PDTr>£V,PR 

*AK>0 «>FF MASK WTOTH 



SHEET 00121 



SUP 
RCA 
SGF 
BRU 
R$ll 
ROW 
! 0X 
PRII 



»>2 

E.A 



**E*TK. 1 R 

A,E 

F.A 

■ CURlJP 
OWN AH? 
XTAKCH PATA TAKCH1 

H-EH DATA TFRMTMAL f>SR 



- SPECIAL CHARACTER LTSTS 
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Table D-6. Data Terminal DSR Listing (Continued) 



s a h * ? l r 

04U T E *> T N A L 



PRK - SPETIAL CHARATTFR LT.$TS 



SHFET PIW2? 



LMWn 
01 HP 
01 HF 

id i C 1 

1C? 

01C* 
Ml C4 
H1 C* 

wlC* 
01C7 
01C* 

» 1 C«> 

tf 5Ca 

01 cp 

nice 

01 CO 
^1CF 
01CF 

PI J)'" 
fclLM 
(ft 10? 

•M04 
010* 
010* 

01Q7 
010* 
0109 

0104 
01O« 

0ior 



wi bt 

0<-*«>F 

5)1 »n 

w f ' w F 

M "• f ' 
W0P 
lr « 1 /i 
H1C3 
tt>»eiA 
0f»17 
4t*0P 
«1C« 

0C*0A 
(*'*HA 

*a 1 CP 

vlff 17 
0<>0A 
/fil7 

pi (7117 

4'*07 
?1 DC 
i*«*0p 

01*00 
4!*0P 

P1D7 

0f»0P 
0B0P 

40»0 
01DA 

05*17 

4f»0P 



075? 
H757. 
^754 
H75* 
075f 
tf7*7 
*75S 
tt75<3 
07*>:* 
<A7fil 
^76? 
07*3 
tf764 
076f 
vi76(T 
07*7 
07*8 
076C 

«77r 

0771 
077? 

«77X 
A77t 

*77*. 
P77C: 
0777 
0778 
077S 
^7»C 
0781 
078? 
0783 
0784 

078s 

078*. 
0787 
0788 
0780 
079^ 
0791 
079? 
fc?793 
0794 
0793 
U79f 
0797 
0798 
079C 

08PIP 
0801 
080? 



******* 

* LISTS 

* IS TE 

* CHAHA 
* 

******* 
* 
XBCKAP 

xcrlf 



♦A********************************************** 

USEn py TWf XI 1ST sn&ROMTTNf . TRANSMISSION 
WMTMATFO BY PTT 1 HF THE WHRH FOLLOWING THF LAST 
CTFR TO «E SENT RETnT, *ET, 

♦♦♦A******************************************** 



FQII $ 

nATA HCKARP 

FQII % 

HATA C» 

nATA NULL 

nATA Nl'LL 

HATA NULL 

DATA NULL 

PATA DC4 
LFLST FQU % 

HAT A LF 
DATA CL^LTN 

r>ATA *4C^« 
FFLST Ffttl $ 

DATA LF 

nATA LF 

nATA LF 
LF3LST FQII $ 

nATA LF 

HAT A CI.RLJA' 

PATA LF 

PATA CLRLIN 

PATA LF 

HATA CLRLIN 

PATA >40 r »0 
CRILST FQII $ 

PATA C» 

PATA NULL 

PATA NULL 

HAT A NULL 

PATA NULL 

PATA NULL 

DATA >40<*0 
CR2LST FQU I 

PATA CR 

PATA NULL 

DATA *40!*0 
HMLST FQU % 

PATA HOME 

PATA CLRLIN 

PATA >40P0 

HEP DATA TERMINAL 



DSR • AUTPFLOW SOURCE 
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Table D-6. Data Terminal DSR Listing (Continued) 



SAP HPlC 

ruTA TFRMYNAL OSR - AUTOFLQW HONRrE 



SHEET &W23 






PEJ 

FNH ISDT 
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Table D-6. Data Terminal DSR Listing (Continued) 



S a f" J r ? l r. 
















T A T A TF^MTNAL D S R 


- AUTnFi.n 


w SOURCE 






*HFET 1 


A 


t> M ■? 


A«0»T 


?ir2t 


P 


000« 


RAC^S! 


00CF 


6AC" S* 1 


ft ''■ i* C 


R RAKSP 


ariflfl 


Ri"K ARP 


005F 


8FLL 


0007 


BTT 


3 5 0R 


RKSI SH 


0t'5C 


RR 


01 


CHAR 


84^^ 


Chapo* 


012^ 


TWGT8L 


0060 


CHKFOF 


PIWAF 


CHKLFR 


0097 


C*m'FF 


HP 9 3 


CLEAR 


|£ P 9 


CLOSE 


00?B 


R CLR 


001F 


CLWl I* 


MC*1 7 


CI PSCR 


0P7F 


C« 


0000 


CR1LST 


0100 


C2I.8T 


01 07 


CRF^RK* 


f * n 


C'fRUP 


001 * 


DATA 


0^00 


DC4 


0(7 I 4 


R DI_E 


001 1* 


DOT^P 


005c 


DONTRG 


0073 


U^NARl 


01 9F 


D W N A R ? 


01 A* 


nwNARP 


019* 


E 


0001 


ENDFIL 


AF AA 


F^R 


002* 


EVE^RV 


01KQ 


EXTT 


810* 


EXTFOP 


(*t>55 


FXTmRM 


00A2 


FF 


000C 


FFFORM 


000F 


PFLST 


01C* 


F"TFF 


01 50 


F^TLF 


015* 


FORMAT 


014R 


FHU.RF 


PIP A 4 


GET 


000R 


GfiTHCP 


00AA 


HMLST 


01OA 


HOMF 


aftf? 


ICCHAR 


0001 


IGKinR 


002R 


ILLOPn 


000Q 


ln«MS 


84tf8 


loco*. 


C7C7 


IHEV.T 


0007 


ISOSRT 


000* 


I SOT 


0000 


TSINT 


0031 


I8R3T 


004R 


R IVRHT 


00A? 


R I v w n T 


0fA2 


L 


0005 


LOT 


000? 


LOTOPC 


0003 


UF 


0P0A 


LF2FR* 


0!?0F 


LF3L3T 


01C9 


LFFORM 


000F 


LFLST 


01C3 


LTNFEH 


0PE0 


L"AO 


0004 


L5TLIN 


01.17 


LSTLUP 


010F 


M 


0*03 


NDCP 


01R? 


NORM 


0020 


NULL 


0000 


OPCOEP 


002* 


0»E* 


0051 


OTWREP 


005A 


P 


0007 


POT 


0001 


P0T1NU 


01*05 


PDTBCK 


0005 


r phtpsv 


0^00 


PDTnBA 


001-1 


POTOEV 


001R 


POTFFH 


0004 


POTFLG 


0001 


PPTLFA 


0007 


PHTLFR 


000F 


PHTLFF 


0002 


PQTLFT 


0003 


r pnTMxn 


0*14 


POTOCT 


001? 


POTOWR 


000F 


PnTPRP 


0000 


pnTRVc 


001* 


PHT3TA 


0015 


POTWVC 


0017 


PHSFRH 


0P0C 


PRB 


0000 


PRBATM 


000? 


PRBDBA 


0003 


prborl 


0^0? 


PRBEOF 


0PI02 


PRBFAC 


0003 


PPBOPC 


0001 


prrhpt 


0003 


PRBOWR 


0001 


PPB8BL 


0003 


PPBSCR 


0004 


PR8RFL 


0000 


PPBUFL 


0001 


PUT 


000A 


ROASCT 


0069 


R RHCDN 


QP3A 


RniwT 


0040 


R03TAT 


0163 


REAR 


0006 


REG 


84A0 


RIGARR 


0191 


RWGREl 


006E 


RL1B0T 


007P 


RUSnuT 


0P67 


3EN0CH 


00Ai 


SET 


0001 


SETRTG 


0078 


8CTWI6 


007* 


8KIP0 


0002 


SKIP1 


0003 


SKPLF 


0114 


SMOCHR 


00£3 


8N0LIM 


0144 


STORE 


0005 


TAB 


0069 


Takchi 


0083 


TAKCHR 


016* 


TFMPi 


001A 


TEMP? 


0019 


TEHP3 


001A 


UPARRO 


01AB 


WRITE 


0007 


WRTCHR 


00EC 


WRTFOF 


0020 


WRTINT 


003C 


WTA3CI 


013A 


X 


6002 


XRCKAR 


01BC 


XCR 


0106 


XCRLF 


0iBn 


XEXNRM 


007E 


XFXTNR 


0171 


XLF 


01 at 


XL PL ST 


0130 


XLIST 


0108 


KMTCHR 


00F1 


XTAKCH 


CM BR 


XXBKAR 


005R 


XVCRLF 


0057 


XXLI5T 


0059 















0024 



0010'* FRRPRS 
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Table D-7. PDT Builder Required Definitions 



Label 



Definition 



ITDBTO 
ITDBT1 
ITDBT2 
ITDBT3 
ITDBT4 

IT DMT 
ITVECT 

IT PDT 1 
SDMAEX 

SDBEXP 
SINTEX 

IDDMAC 



JDSCAA 



Pointer to the internal IO expansion PDT branch table 

Pointer to the 1st IO expansion PDT branch table 

Pointer to the 2nd IO expansion PDT branch table 

Pointer to the 3rd IO expansion PDT branch table 

Pointer to the 4th IO expansion PDT branch table 

Pointer to the DMAC expansion PDT branch table 

Label indicating the start of the vector interrupt PDT branch 
table 

Label indicating the start of the 1st PDT in the system 

Label on word containing the DMAC expansion flag: 

- no expander 

1 - expander 

Label on word containing the number of I/O bus external ex- 
pansions, value: 0-4 

Label on word indicating that there is internal I/O expansion 

- no internal expansion 

1 - internal expansion 

Label indicating a word that returns control to the system 
when no processing is required on an interrupt. This label 
may be used in PDT words 12 and 17^ or may be branched to 
when the processing required to clear an unsolicited interrupt 
is complete. 

Pointer to a system memory managed area. This pointer 
should be used by the PDT Builder program when a block of 
memory is required in the system. 



The utility requires some memory allocated permantly for the PDT and any 
other structures required by the new device. This memory block should be 
at least 18 words (more if temporary storage is required). To allocate this 
memory space, the utility has access to one of the system memory manager 
routines. The following is the calling sequence for the memory allocation 
(MRAL) routine: 

REF MRAL 
REF JDSCAA 



(listing continued on next text page' 



Change 1 
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(ADD J 

f 



GET MEMORY 
FOR PDT 
STRUCTURE 
( > 18 WORDS) 



I 



USE MEMORY 
MANAGER 




LINK NEW 

PDT 

INTO CHAIN 



CHAIN THROUGH 

PDT'S 

TO END OF 

CHAIN 



I 



ITPDT1 =LABEL 
FOR 1ST PDT ; 
LAST PDT HAS 
A ZERO IN POINT- 
ER TO NEXT PDT 



I 



INITIALIZE 

1ST 1 8 WORDS 
OF PDT 



SET POSSIBLE 
DEVICE ID 

= 254 




CHAIN THROUGH 
PDT'S TO 
DETERMINE 



I 



ADD POINTER 
TO INTERRUPT 
BRANCH TABLES 



I END J 



ID=ID-1 



SELECT 
RESULT AS 
NEW ID 
FOR PDT 




(A)1 30254 



Figure D-10. Addition of New PDT 
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@LDA JDSCAA 
STA ARG1 + I 
@LDM =ARG1 
@BRL MRAL 



ARG1 DATA 3 # of arguments 

DATA $-$ 
DATA BLKADR 
DATA BLKSIZ 

BLKSIZ DATA $ - $ Size of block needed 

BLKADR DATA Pointer to requested block 

Upon return from the MRAL routine, determine if the requested block 
was given to the PDT Builder utility. If the pointer to the requested block 
(BLKADR) is zero, then the memory was not available. 

The PDT Builder utility has access to a label indicating the start of the first 
PDT in the PDT chain. To determine a suitable device I.D. number, select 
the largest, non-assigned device I.D. (<255). Chain down through each PDT 
to determine if the selected I.D. is assigned. The last PDT on the chain is 
identified by a in the Next PDT Pointer field (WORD 0). 

After assigning a device I. D. , chain the PDT to the last PDT on the list and 
initialize the PDT according the description provided in figure D-2. Then 
place the PDT pointer in the appropriate PDT interrupt branch table as 
described earlier in this appendix. 

Once the PDT builder program is coded, assemble it using SAPG. Object 
output should be to the file (USEROl, ASMOUT). Then link it with the DX980 
operating system using DXOLE. The following job control is required to do 
this using the standard LINK procedure. Refer to Section VIII for a detailed 
description of the DXOLE utility. The following is a sample Link: 

//RUNDXOLEP DOBl = DISCl DIN=SC; 

, . FLM = (SYSTEM, UTLFIL) RLM LLM=(3, 0, 32, 3) 

The input would then be as follows: 

^SUBSYSTEM OVLY 

tfROOT MAIN. 

^SEGMENT 1 

^INCLUDE 1 object for PDT utility 

/* 
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D. 3 ADDING THE NEW DEVICE SERVICE ROUTINE 

Every DX980 has a standard utility, LMUPDT, that updates a memory image 
phase (MIP) of a load module generated by the DXOLE utility. LMUPDT can 
replace any of four dummy memory image phases (MIP Nos. 181, 182, 183 
and 184) in the DX980 system load module. 

Perform the following procedure to update the DX980 load module: 

1. Reference the description of the load module update (LMUPDT) 
utility in Section VIII of this manual. 

2. Perform this update procedure using the <userid> of SYSTEM. 

3. Run the standard LMUPDT. Set LUN 5 to the record input device. 
This record should be the MIP number of the system load module 
MIP to be updated. Set LUN 7 to the relative record file of the 
DX980 system load module, (SYSTEM, SYSLD). The input is as 
follows: 

//RUN LMUPDT DCON=SC FLM= (SYSTEM, UTLFIL); 
FUPD=(SYSTEM, SYSLD) 

4. Once the phase has been replaced, reload the system via the IPL 
program. 

This utility does not replace an existing module. Instead, it adds a module 
to the end of the File and changes pointers from the old MIP to indicate the 
new MIP. Therefore, after replacing the MIP several times in the process 
of testing and debugging, LMUPDT may terminate with an error indication 
such as "file full". To prevent this problem, build a development system 
load file using the load module copy program (DXCOPY). The new file should 
be large enough to allow for expansion. Once the MIP has been tested, this 
file may be deleted. Then run. the update utility against the system file or 
disc. 
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ALPHABETICAL INDEX 
INTRODUCTION 

The following index lists key words and concepts from the subject material 
of the manual together with the area(s) in the manual that supply major cov- 
erage of the listed concept. The Reference column of the listing contains 
references to the following manual areas: 

• Sections - References to Sections of the manual appear as "Section 
x" with the symbol x representing any numeric quantity. 

• Appendixes - References to Appendixes of the manual appear as 
"Appendix y" with the symbol y representing any capital letter. 

• Paragraphs - References to paragraphs of the manual appear as a 
series of alphanumeric or numeric characters punctuated with deci- 
mal points. Only the first character of the string may be a letter; 
all subsequent characters are numbers. The first character refers 
to the section or appendix of the manual in which the paragraph is 
found. 

• Tables - References to tables in the manual are represented by the 
capital letter T followed immediately by another alphanumeric char- 
acter (representing the section or appendix of the manual containing 
the table). The second character is followed by a dash (-) and a 
number: 

Tx-yy 

• Figures - References to figures in the manual are represented by 
the capital letter F followed immediately by another alphanumeric 
character (representing the section or appendix of the manual con- 
taining the figure). The second character is followed by a dash (-) 
and a number: 

Fx-yy 

• Other entries in the Index - References to other entries in the index 
are preceded by the word "See" followed by the referenced entry. 
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ALPHABETICAL INDEX 



I 



Subject 

Area, Job .Extension 
Assembler, Symbolic 
Assign Command 

Batch Input Reader 
Batch Input Spooler 
Batch Output Spooler 
Binary Code 
BIR 



BIS 

BLDEDT 
Block, Physical 

Record 
Blocking 

BOS 

BPS 

Buffer, Data 

Exchange 
Buffers 
Build Edit File 

Calls, Supervisor 
CATFIL 
CATFIL Error 

Messages 
CAT LOG 

CATLOG Error 

Messages 
Clear LDT Bit 

Utility 
Clear PDT Bit 

Utility 
Clear PRB Bit 

Utility 
Close 



Reference 

1.8.2 

8.9 

2.5.4 

See BIR 
See BIS 
See BOS 

T3-9 

6.1, 6.2, 

1.4.3, 1.4.3.1, 

8.5.4.4 

6.1, 6.3, 

1.4.3, 1.4.3.2 

8.14 

D.2.1 

4.1, 1.8.2, 

4.4.2, 2.5.3.2 
6.1, 6.4, 

1.4.3, 1.4.3.3 
1.4, 1.4.3, 
1.7. 1, 2.3.4 

1.4.2 

4.4.3.5 

8.14 

3.1 

8.4 

T8-7 

8.3, 2.4. 1.3, 
7.2.1.2 

T8-5 

D.2.3.2 

D.2.3.2 

D.2.3.2 

3.4, 3.8.1.6 



Subject 


Reference 


Code, Memory 






Resident 


1.4.1, 






1.4.1. 


2 


Code, Hollerith 


T3-8 




Code, USASCII 


T3-7, 


T3- 


Code, Binary 


T3-9 




Command Scanner 






Error Codes 


T5-6 




Command Scanner 


5. 15 




Command Table 


1.4.2 




Compact Control 






Card 


8.5.4. 


3 


Compact Mode 


8.5 




Compiler, 






FORTRAN IV 


8.10 




Conditional Instruc- 






tion Skip 


D.2.3, 


.3 


Create 


2.5.2, 





Create Task 
Creator 



CRT 

Data Command 

Debug, Program 

DEB980 

Delete 



Delete Record 
Device Service 

Routine 
Device Service 

Routines, Reentrant 
Device Table, 

Physical 
D evnam 
Directory, Master 

File 



8.3.4.2 

5.12 

1.8.2, 

2.4.1.3, 

2.5.4.10 

7.1, 7.2 

6.2.3, 
6.3.3 



2.5.2, 
2.5.4.7, 
8.3.4.3 
7.2.2.4 

D.l, D.2 

D.2.9.2 

1.5 
2.5.4.2 

4.3, 
1.8.1 
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ALPHABETICAL INDEX (Continued] 



Subject 


Reference 


Subject 


Reference 


Directory, User 


4.3, 


Error Messages, 






1.8. 1, 


DXCOPY 


T8-15 




1.8.2 


Error Messages, 




DSC A 


1.4.1, 


DXOLE 


T8-10 




1.4. 1.4 


Error Messages, 




DSR 


1.5, 3.1, 


SAPG 


T8-19 




3.8. 1, 


Error Messages 






3.8.2 


Phase 1, FORTRAN 


T8-21 


DSR, Sample 


TD-5, TD-6 


Error Messages 






FD-8, FD-9 


Phase 2, FORTRAN 


T8-22 


DXCOPY 


7.2, 8.7 


Error Messages 




DXCOPY Error 




Runtime, FORTRAN 


T8-23 


Messages 


T8-15 


Errors 


3.7, 4.4.4, 


DXOLE 


8.5 




3.3.1.2, 


DXOLE Error 






3.8.5.2, 


Messages 


T8-10 




3.8.6.2, 
3.8. 1. 16, 


EDB 


5. 10, 5.9. 1, 




T3-4, T3-5, 




F5-1 




T4-2 


TT , Ji+- TJI^. 


7. 1. 6 






J_JVJ.il. _.' 11C 


7.2. 1. 1 


Errors, I/O 


D.2.2.5 




Event 


5.10, 5.9.2, 


Editing 


7.2, 




5.9.3, T5-2 




3.8. 1.2 


Event Index 


5.9. 1 


Editor, Master File 




Exclusive 


2.5.4.3 


Directory- 


8.3 


Execute 


2.5.3 


Editor, Overlay- 




Execute I/O 


3. 5, 5 S 16 


Link 


8.5 


Exit DSR 


D.2.3.6 


END 


2.5. 5 


Extend 


7.1.6 


Enter File 


7.1.6, 
7.2. 1.2 


Extended Physical 






Device Table 


D.2.4, FD-3 


ERRCOD 


5.6 


Extract Mode (SMR). 


8. 12.4.3, f 


Error, Fatal 


3. 7. 3 




8. 12.4.6 


Error, Logical 


3.7. 1, 








3.3. 1.7 


File 


1.8, 2.2, 


Error, Severe 


3.7.2, 




1.8. 1, 




3.3.2.1 




1.8.2, 


Error Codes, Com- 






1.8.3, 


mand Scanner 


T5-6 




Section 4 


Error Messages 


Appendix A 


File, Key Indexed 


1.8.3, 


Error Messages, 






4.4.3, F4-3 


CATLOG 


T8-5 


File, Linked Se- 




Error Messages, 




quential 


1.8.3, 


CATFIL 


T8-7 




4.4. 1, F4-1 
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ALPHABETICAL INDEX (Continued) 



Subject 


Reference 


Subject 


Reference 


File, Relative 








Record 


4.4.2, 


I/O Errors 


D.2.2.5 




1.8.3, 


I/O Manager 


D.2.1 




2.5.4.9, F4-2 


IFE 


7.2, 1.4.2 


File, Saved 


F8-6 


Include Control Card 


8.5.4.3 


File Copy 


8.7 


Index, Event 


5.9.1 


File Features 


T4-1 


Initiate I/O 


3.5, 5. 16 


File Integrity 


2.5.4.10 


Insert Record 


7.2.2.3 


File Manager 


See FILMGR 


Integrity, File 


2.5.4. 10 


Utility 




Interactive File 




Fileid 


1.8.1, 


Editor 


See IFE 




2.4. 1.3, 


Interactive Terminal 






2.4.1.4, 


Subsystem 


See ITS 




2.5.4.6 


IOCOM 


D.2.3.1 


FILMGR 


8. 16 


ISDSRI 


D.2.2.1 


Filnam 


4.3, 1.8. 1, 


ITFDIO 


C.1.2, FC-3 




2.4. 1.4, 


ITINIT 


C. 1.1.1 




2.5.4.6 


ITPBIO 


C.1.-3, FC-4 


Find Record 


7.2.2.1 


Itrks 


2.5.4.11 


Find String 


7.2.2.5 


ITS 


1.4, 1.4.2, 


Flags 


3.3.2. 1, 




1.7. 1, 2.3.4, 




3.3.2.2, 




2.4. 2. 1, Section 




3.3.2.3 




7, Appendix C 


Formatted Records 


3.6, 


ITSUPV 


C.1.4, 




3.3.2.2, 




1.4.2, 




3. o. 2.2, 




C 1.1.2, 




3.8.3.1, 




C.l.1.3, 




3.8.6. 1 




FC-5 


FORTRAN 


2.2, 2.3. 1, 








2.3.2 


Jarea 


4.2, 


FORTRAN Error 






2. 5.3.2 


Messages Phase 1 


T8-21 


JCL 


1.5, 1. 7. 1, 


FORTRAN Error 






1.8. 1, 


Messages Phase 2 


T8-22 




Section 2 


FORTRAN Error 




JCL Sequences, 


. 


Messages Runtime 


T8-23 


Sample 


Appendix B 


FORTRAN IV Com- 




JCL Translator 


8.2, 2.3. 1, 


piler 


8.10 




2.3. 3 


Free Area 


1.6 


JCLTRN 


8.2 






Jcsnam 


2.4.2.2, 


GET Routine 


D.2.3.7 




2.4.2.4 


Hollerith Code 


T3-8 


Jearea 


4.2, 
2.5.3.2 






JLDT 


5.17, 5.20, 

T5-7 


Change 1 
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ALPHABETICAL INDEX (Continued) 



Subject 
Job 



Job Command 



Job Extension Area 



Job Queue 

JSB 

J s name 

Jsprty 

Key Indexed File 

Keylen 

Latency Time 

LDT Bit Utility, 
Clear 

LDT Bit Utility, Set 

LDT Word from 
Register, Store 

LDT Word to Reg- 
ister, Load 

LIBBLD 

Library 

Library Builder 

Library Control Card 

Limits 

Link Editor, Overlay 

Linkable Parts File 
Build 

Linked Sequential 
File 



Reference 

1 • X « X « i j 

2.1. 2.2, 
1.7.1, 
1.7.2, 

2 a t e 
. <±. 1. 3 

2.4, 2.4. 1, 

6.2. 1, 

6.3. 1, 
7.1.6, 
7.3.1, 
2.4.1.3 

4.4.2, 
2.5.3.2 
1.7. 1 
5.9, T5-5, 

2.4. 1.2 
2.5.3.3 

1.8.3, 

4.4.3, F4-3 
2.5.4.12 

D.2.5.1 

D.2.3.2 
D.2.3.2 

D.2.3.4 

D.2.3.4 

8.6 

4.4.3.3 • 

8.6 

8.5.4.3 

5.5 

8.5 

8.13 

1.8.3, 
4.4.1, F4-1 



Subject 


Reference 


List 


8.3.4. 1 


List Edit Files 


8.15 


List Record 


7.2.2.8 


List User File 






Q A 


LMUPDT 


8.11, D.3 


Load LDT Word to 




Register 


D.2.3.4 


Load Module 


F8-4, T8-12 


Load Module Update 


8.11 


Load PDT Word to 




Register 


D.2.3.4 


Load PRB Word to 




Register 


D.2.3.4 


Logical Device Table 


D.2.5, 




C. 1.1.1, 




TD-3, FD-4 


Logical Error 


3.7. 1, 




3.3.1.7 


Logical Record 


4.1, 4.2, 




4.4.3.7, 




2.5.4. 13 


Logoff 


7.1.6 


Logon 


7.1.5 


LPFBLD 


8.13 


Lrecl 


2. 5.4. 13 


LSTEDT 


8.15 


LUN 


1.5, 2.2, 




6.4, 




2.5.4.1, 




3.3.1.9 



Manager, I/O 
Master File 

Directory 
Master File 

Directory Editor 
Memory Image 
Memory Image 

Phase 
Memory Resident 

Code 



D.2.1 

4.3, 1.8.1 

8.3 

5.13, 5.14 

F8-4, F8-5 

1.4. 1, 
1.4.1.2 
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ALPHABETICAL INDEX (Continued) 



Subject 


Reference 


Module, Load 


F8-4, T8-12 


MRAL Memory Allo- 




cation Routine 


D.2.9.4 


Mtrks 


4.3, . 




2.5.4.11 


Nbufs 


2.5.4.8 


NEW 


2.5.4.5 


NEW LIB 


8.12.4 


Normal Control Card 


8.5.4.3 


Normal Mode 


8.5 


NOVLY 


8.5.4.2 


Nprty 


2.5.3.3 


Nucleus 


1.4, 1.4.1 


Object Control Card 


8.5.4.3 


OLD 


2.5.4.5 


OLD LIB 


8.12.4 


Opcodes 


T4-3, T3-2, 




T3-5, T3-10 


OPD 


3.2, 5. 1 


Open 


3.4, 




3.8. 1.6 


Overlay Link Editor 


8.5 


Overlay Manager, 




Runtime 


8.5.4.1 


Overlays, Pre- 




planned 


8.5.4.1 


Overlays, Unplanned 


8.5.4.2 


Pass 


2.5.4.4 


Password 


1.8.2 


PDT Bit Utility, 




Clear 


D.2.3.2 


PDT Bit Utility, Set 


D.2.3.2 


PDT Builder Utility 


D.2.9.4 


PDT Pointer Table 


FD-6, FD-7 


PDT Word from 




Register, Store 


D.2.3.4 


PDT Word to 




Register, Load 


D.2.3.4 


Phase, Memory 




Image 


F8-4, F8-5 



Subject 

Physical Device Table 



Physical Device 
Table, Extended 

Physical Record 

Physical Record 

Block 
Pool, Procedure 

PRB 



PRB Bit Utility, Set 
PRB Bit Utility, 

Clear 
PRB Word from 

Register, Store 
PRB Word to 

Register, Load 
Preplanned Overlays 
Procedure Pool 

Program Debug 

Prot 

Prty 

Prwds 

Pseudo Time Slicing 

Pswd 

PUT Routine 

Read I/O Bus to 

Register 
Read Operations 

Timeout 
Record 



Reference 

1.5, D.2.4 
C.l. 1. 1, 
TD-1, FD-2 

FD-3, 
D.2.4 

4.1, 4.2 
1.8.2 

See PRB 
1.6, 

1.4. 1.3 

3.2, 3.3, 

3.5, 4.2, 
4.5, 

C.l.l. 1, 
D.2.1, 
3.8.1.1, 
F3-3, F3-4 
D.2.3.2 

D.2.3.2 

D.2.3.4 

D.2.3.4 

8.5.4.1 

1.6, 

1.4. 1.3 

8.8 

2.5.3.5 

2.5.3.3 

2.5.4.11 

C.2.3 

2.4. 1.4, 

2.5.4. 10 

D.2.3.7 

D.2.3.5 

3.8.1.19 
1.8 
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ALPHABETICAL INDEX (Continued; 



Subject 

Record, Formatted 



Record, Logical 



Record, Physical 

Record, Unformatted 
Reentrant Device 

Service Routines 
Relative Record File 



i^eiease 

Remote Job Entry 

Replace 

Replace Record 
Replace String 

RJE 

Root Control Card 

Routine, Device 

Service 
Run Command 



Runtime 
Runtime Overlay 

Manager 

SAPG 
SAPG Error 

Messages 
Save 
Saved File 



Reference 

3.3.2.2, 

3.6, 

3. 8. 2.2, 

3.8.3. 1, 
3.8.6.1 
4.1, 4.2, 
1.8.2, 
4.4.3.7, 
2.5.4.13 

4.1, 4.2, 
1.8.2 
3.6 

D.2.9.2 

1.8.3, 

4.4.2, 

2.5.4.9, 

F4-2 

i r a a 
C, D. *±. *± 

See RJE 

2.5.2, 

2.5.4.5 

7.2.2.2 

7.2.2. 6, 

7.2.2.7 

7.3 

8.5.4.3 

D.l, D.2 

2.4, 2.4.2, 

6.2.2, 

6.3.2, 

7.1.6, 

7.3.2 

2.2, 2.3.2 

8.5.4. 1 
8.9 

T8-19 

2.5.4.7 

F8-6 



Subject 


Reference 


Scanner, Command 


5.15 


SCRASH 


D.2. 2. 6 


Search Control Card 


8.5.4.3 


Segment Control 




Card 


8. 5.4. 3 


Set LDT Bit Utility 


D.2. 3. 2 


Set PDT Bit Utility 


D.2. 3. 2 


Set PRB Bit Utility 


D.2. 3. 2 


Severe E.rror 


3.7.2, 




3.3.2.1 


Share 


2.5.4.3 


SJCBFL 


1.8. 1, 




2.4.1.4, 




2.4. 1.5 


Skip, Conditional 




Instruction 


D.2. 3. 3 


SMR 


8.12 


Source Maintenance 




XVUULUIC 


Q 1 9 


Spooling 


6.2, 6.3, 




6.4 


STATUS 


7. 1.6, 7.4 


Status 


3.8.5. 1, 




3.8. 1. 17 


Step 


2.2, 2.3. 1, 




2.3.2 


Stksiz 


2.5.3.2 


Store LDT Word 




from Register 


D.2. 3.4 


Store PDT Word 




from Register 


D.2. 3.4 


Store PRB Word 




from Register 


D.2. 3.4 


Subsystem Control 




Card 


8.5.4.3 


Subsystem Mode 


8.5 


Supervisor Calls 


2.5, 3. 1, 




1.4. 1, 




1.7.2, 




Section 5, 




T5-1, T5-2 


Symbolic Assembler 


8.9 
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ALPHABETICAL INDEX (Continued) 



Subject 


Reference 




Subject 


Reference 


SYSIN 


6.2. 3. 1, 




Unformatted Records 


3.6 




6.3.3.3 




Unplanned Overlays 


8.5.4.2 


SYSOUT 


6.4 




Update Mode (SMR) 


8. 12.4. 1, 


System Console 


2.3.2, 






8. 12.4.4 




2.3.4, 




USASCII Code 


T3-7, T3-8 




7.1.3 




User Control Block 


See UCB 


System Disc 


1.8. 1 




User Directory 


4.3, 1.8.1, 


System File 


1.8. 1, 






1.8.2 




2.4.1.4, 




Userid 


7.1.5, 




2.4. 1.5 






2.4. 1.3 


System Output 






Utilities 


Section 8 


Queue 
System Table 


6.4 
1.4. 1. 1 




Verify Mode (SMR) 


8. 12.4.2, 


Table, Command 
Table, Extended 
Physical Device 


1.4.2 
D.2.4, FD 


-3 


Volume 


8. 12.4.5 
1.8. 1, 
2.4. 1.4 


Table, Logical 






Wait 


3.5, 5. 9 


Device 


D.2.5, 




Wait Criteria List 


See WCL 




C. 1.1.1, 




Wait for I/O 


5.16 




TD-3, FD- 


4 


WCL 


5.9. 1, F5-1, 


Table, PDT Pointer 


FD-6, FD- 


7 




F5-2 


Table, Physical 






Write I/O Bus from 




Device 


1.5, D.2.4 
C.l. 1.1, 
TD-1, FD- 


2 


Register 


D.2.3.5 


Table, System 


1.4. 1. 1 








Task 


1.1, 1.7, 
1.7. 1, 
1.7.2 








Task Control Block 


2.5.3.2 








Taskid 


5.8 








Teleprinter 


7.1.2 








Temp 


2.5.4.6 








Time 


2.5.3.4 








Time Slicing Pseudo 


C.2.3 








Translator, JCL 


2.3.1, 
2.3.3 








T rknum 


4.3, 
2.5.4. 11 








UCB 


C.1.4, 
1.4.2, TC- 


-2 







Change 1 



Index 8 



Digital Systems Division 



z 

o 
z 

o 

-J 

< 

H 



USER'S RESPONSE SHEET 



Manual Titi»- DX980 General Purpose Operating System 
Programmer's Guide (943005-9701) 



Manual i)at*»-l August 1975 Date of This Letter:. 

User's Name: Telephone:. 



Company: Office/Department:. 

Street Address: 



City /State/Zip Code: 



Please list any discrepancy found in this manual by page, paragraph, figure, or table number in 
the following space. If there are any other suggestions that you wish to make, feel free to 
include them. Thank you. 

Location in Manual Comment/Suggestion 



NO POSTAGE NECESSARY IF MAILED IN U.S.A. 
FOLD ON TWO LINES (LOCATED ON REVERSE SIDE), STAPLE AND MAIL 



First Class 
| PERMIT NO. 31351 
Austin. Texas 



BUSINESS REPLY MAIL 
No Postage Necessary if Mailed in the United States 



Postage Will Be Paid by 

TEXAS INSTRUMENTS INCORPORATED 

DIGITAL SYSTEMS DIVISION 



RO. BOX 2909 • AUSTIN .TEXAS 78767 
Attn: TECHNICAL PUBLICATIONS, MS 2146 



fr 



980B 

SYSTEM 

DESCRIPTION 



943012-9701 



FORTRAN 



944800-9701 



OVERLAY 

LINK 

EDITOR 



961961-9714 



SYSTEM/ 3X0 
SUPPORT 



961961-9712 



980 COMPUTER 

SYSTEM 

SOFTWARE 

MANUALS 



LANGUAGES 



BASIC LANG 

INTERPRETER 

SYSTEM 



943002-9701 




PROGRAM DEVELOPMENT 



960/980 

PROGRAM 

DEBUG 



942760-9701 



ASSY LANG 

PROGRAMMER'S 

REFERENCE 



943013-9701 



ASSY LANG 
INPUT/OUTPUT 



961961-9734 



PROGRAMMING 
CARD 



943000-9701 



OPERATING SYSTEMS 



BASIC SYSTEM 

USE AND 

OPERATION 



961961-9710 



DX980 

PROGRAMMER'S 

GUIDE 



943005-9701 



DX980 

SYSTEM 

DOCUMENTATION 



943015-9701 



DX980 SYSTEM 

OPERATION 

GUIDE 



943004-9701 




Texas Instruments 



INCORPORATED 



DIGITAL SVSTCMS DIVISION 
POST OFFICE BOX 2909 • AUSTIN, TEXAS 78767 



